home *** CD-ROM | disk | FTP | other *** search
/ Acorn User: China / Acorn User China CD-ROM (UK) (Disc B) / Acorn User China CD-ROM (UK) (Disc B).bin / STUTTGART / GAMES / FUNNYMINES / !StrmSweep_!RunImage < prev    next >
Unknown  |  1995-01-16  |  25.5 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 23 ee 85 20 e7 | 20 9f 3d 31 37 20 f1 22 |...#.. .| .=17 ."|
|00000010| 42 79 65 20 62 79 65 22 | 3a e0 20 8b 20 f6 3a f1 |Bye bye"|:. . .:.|
|00000020| 9e 3a e0 0d 00 14 15 f2 | 61 73 73 65 6d 62 6c 65 |.:......|assemble|
|00000030| 67 72 69 64 63 6f 64 65 | 0d 00 1e 13 d6 20 67 65 |gridcode|..... ge|
|00000040| 74 73 63 72 65 65 6e 69 | 6e 66 6f 0d 00 28 4b e7 |tscreeni|nfo..(K.|
|00000050| 20 76 64 75 76 61 72 69 | 61 62 6c 65 6c 69 73 74 | vduvari|ablelist|
|00000060| 21 38 3c 3e 31 35 20 f1 | 22 50 6c 65 61 73 65 20 |!8<>15 .|"Please |
|00000070| 72 75 6e 20 74 68 69 73 | 20 67 61 6d 65 20 66 72 |run this| game fr|
|00000080| 6f 6d 20 61 20 31 36 2d | 63 6f 6c 6f 75 72 20 6d |om a 16-|colour m|
|00000090| 6f 64 65 22 3a e0 0d 00 | 32 1c eb 20 eb 3a 87 3a |ode":...|2.. .:.:|
|000000a0| f2 73 65 74 70 61 6c 65 | 74 74 65 3a f2 74 69 74 |.setpale|tte:.tit|
|000000b0| 6c 65 0d 00 3c 0f f1 8a | 30 2c 31 30 29 3a fb 31 |le..<...|0,10):.1|
|000000c0| 34 0d 00 46 47 f2 70 72 | 69 6e 74 63 65 6e 74 72 |4..FG.pr|intcentr|
|000000d0| 65 64 28 22 57 65 6c 63 | 6f 6d 65 20 74 6f 20 53 |ed("Welc|ome to S|
|000000e0| 74 6f 72 6d 73 77 65 65 | 70 65 72 20 76 65 72 73 |tormswee|per vers|
|000000f0| 69 6f 6e 20 30 2e 30 33 | 20 28 31 36 2d 44 65 63 |ion 0.03| (16-Dec|
|00000100| 2d 39 35 29 22 2c 34 29 | 0d 00 50 38 f2 70 72 69 |-95)",4)|..P8.pri|
|00000110| 6e 74 63 65 6e 74 72 65 | 64 28 22 50 72 65 73 73 |ntcentre|d("Press|
|00000120| 20 3c 45 73 63 3e 20 61 | 74 20 61 6e 79 20 74 69 | <Esc> a|t any ti|
|00000130| 6d 65 20 74 6f 20 66 69 | 6e 69 73 68 22 2c 35 29 |me to fi|nish",5)|
|00000140| 0d 00 5a 05 f5 0d 00 64 | 45 20 20 f1 22 53 69 7a |..Z....d|E ."Siz|
|00000150| 65 20 6f 66 20 67 72 69 | 64 20 69 6e 20 78 20 64 |e of gri|d in x d|
|00000160| 69 72 65 63 74 69 6f 6e | 20 28 33 2d 22 3b c3 28 |irection| (3-";.(|
|00000170| 31 2b 76 64 75 76 61 72 | 69 61 62 6c 65 6c 69 73 |1+vduvar|iablelis|
|00000180| 74 21 31 32 29 3b 22 29 | 22 3b 0d 00 6e 0d 20 20 |t!12);")|";..n. |
|00000190| e8 78 73 69 7a 65 25 0d | 00 78 31 20 fd 20 78 73 |.xsize%.|.x1 . xs|
|000001a0| 69 7a 65 25 3e 3d 33 20 | 80 20 78 73 69 7a 65 25 |ize%>=3 |. xsize%|
|000001b0| 3c 3d 28 31 2b 76 64 75 | 76 61 72 69 61 62 6c 65 |<=(1+vdu|variable|
|000001c0| 6c 69 73 74 21 31 32 29 | 0d 00 82 05 f5 0d 00 8c |list!12)|........|
|000001d0| 45 20 20 f1 22 53 69 7a | 65 20 6f 66 20 67 72 69 |E ."Siz|e of gri|
|000001e0| 64 20 69 6e 20 79 20 64 | 69 72 65 63 74 69 6f 6e |d in y d|irection|
|000001f0| 20 28 33 2d 22 3b c3 28 | 76 64 75 76 61 72 69 61 | (3-";.(|vduvaria|
|00000200| 62 6c 65 6c 69 73 74 21 | 31 36 2d 35 29 3b 22 29 |blelist!|16-5);")|
|00000210| 22 3b 0d 00 96 0d 20 20 | e8 79 73 69 7a 65 25 0d |";.... |.ysize%.|
|00000220| 00 a0 31 20 fd 20 79 73 | 69 7a 65 25 3e 3d 33 20 |..1 . ys|ize%>=3 |
|00000230| 80 20 79 73 69 7a 65 25 | 3c 3d 28 76 64 75 76 61 |. ysize%|<=(vduva|
|00000240| 72 69 61 62 6c 65 6c 69 | 73 74 21 31 36 2d 35 29 |riableli|st!16-5)|
|00000250| 0d 00 aa 05 f5 0d 00 b4 | 34 20 20 f1 22 4e 75 6d |........|4 ."Num|
|00000260| 62 65 72 20 6f 66 20 6d | 69 6e 65 73 20 28 31 2d |ber of m|ines (1-|
|00000270| 22 3b c3 28 78 73 69 7a | 65 25 2a 79 73 69 7a 65 |";.(xsiz|e%*ysize|
|00000280| 25 2d 34 29 3b 22 29 22 | 3b 0d 00 be 13 20 20 e8 |%-4);")"|;.... .|
|00000290| 6e 6f 5f 6f 66 5f 6d 69 | 6e 65 73 25 0d 00 c8 37 |no_of_mi|nes%...7|
|000002a0| 20 fd 6e 6f 5f 6f 66 5f | 6d 69 6e 65 73 25 3e 3d | .no_of_|mines%>=|
|000002b0| 31 20 80 20 6e 6f 5f 6f | 66 5f 6d 69 6e 65 73 25 |1 . no_o|f_mines%|
|000002c0| 3c 3d 28 78 73 69 7a 65 | 25 2a 79 73 69 7a 65 25 |<=(xsize|%*ysize%|
|000002d0| 2d 34 29 0d 00 d2 51 e8 | 22 54 69 6d 65 20 62 65 |-4)...Q.|"Time be|
|000002e0| 74 77 65 65 6e 20 73 74 | 6f 72 6d 73 20 28 69 6e |tween st|orms (in|
|000002f0| 20 73 65 63 6f 6e 64 73 | 29 22 74 65 6d 70 73 74 | seconds|)"tempst|
|00000300| 6f 72 6d 74 69 6d 65 3a | 73 74 6f 72 6d 74 69 6d |ormtime:|stormtim|
|00000310| 65 25 3d 31 30 30 2a 74 | 65 6d 70 73 74 6f 72 6d |e%=100*t|empstorm|
|00000320| 74 69 6d 65 0d 00 dc 23 | 67 72 69 64 73 69 7a 65 |time...#|gridsize|
|00000330| 25 3d 28 78 73 69 7a 65 | 25 2b 32 29 2a 28 79 73 |%=(xsize|%+2)*(ys|
|00000340| 69 7a 65 25 2b 32 29 0d | 00 e6 27 de 20 67 72 69 |ize%+2).|..'. gri|
|00000350| 64 25 20 67 72 69 64 73 | 69 7a 65 25 2c 20 67 72 |d% grids|ize%, gr|
|00000360| 69 64 32 25 20 67 72 69 | 64 73 69 7a 65 25 0d 00 |id2% gri|dsize%..|
|00000370| f0 13 eb 20 eb 3a fb 31 | 32 38 2b 31 33 3a db 3a |... .:.1|28+13:.:|
|00000380| 87 0d 00 fa 16 f2 73 65 | 74 70 61 6c 65 74 74 65 |......se|tpalette|
|00000390| 3a f2 74 69 74 6c 65 0d | 01 04 23 41 25 3d 67 72 |:.title.|..#A%=gr|
|000003a0| 69 64 25 3a 42 25 3d 67 | 72 69 64 73 69 7a 65 25 |id%:B%=g|ridsize%|
|000003b0| 3a 43 25 3d 25 30 31 30 | 30 30 0d 01 0e 0f d6 20 |:C%=%010|00..... |
|000003c0| 63 6c 65 61 72 67 72 69 | 64 0d 01 18 13 d6 20 67 |cleargri|d..... g|
|000003d0| 65 74 73 63 72 65 65 6e | 69 6e 66 6f 0d 01 22 0f |etscreen|info..".|
|000003e0| f2 63 65 6e 74 72 65 67 | 72 69 64 0d 01 2c 0f f2 |.centreg|rid..,..|
|000003f0| 70 6c 61 63 65 6d 69 6e | 65 73 0d 01 36 09 43 25 |placemin|es..6.C%|
|00000400| 3d 41 25 0d 01 40 16 f4 | 43 41 4c 4c 73 68 6f 77 |=A%..@..|CALLshow|
|00000410| 6d 69 6e 65 73 63 6f 70 | 79 0d 01 4a 20 41 25 3d |minescop|y..J A%=|
|00000420| 67 72 69 64 25 3a 42 25 | 3d 78 73 69 7a 65 25 3a |grid%:B%|=xsize%:|
|00000430| 43 25 3d 79 73 69 7a 65 | 25 0d 01 54 12 d6 6d 69 |C%=ysize|%..T..mi|
|00000440| 6e 65 61 64 6a 61 63 65 | 6e 63 79 0d 01 5e 11 d6 |neadjace|ncy..^..|
|00000450| 75 70 64 61 74 65 73 63 | 72 65 65 6e 0d 01 68 51 |updatesc|reen..hQ|
|00000460| f2 70 72 69 6e 74 63 65 | 6e 74 72 65 64 28 22 4d |.printce|ntred("M|
|00000470| 69 6e 65 73 20 6c 65 66 | 74 3a 22 2b c3 28 6e 6f |ines lef|t:"+.(no|
|00000480| 5f 6f 66 5f 6d 69 6e 65 | 73 25 29 2c 32 2b 28 76 |_of_mine|s%),2+(v|
|00000490| 64 75 76 61 72 69 61 62 | 6c 65 6c 69 73 74 21 31 |duvariab|lelist!1|
|000004a0| 36 2b 79 73 69 7a 65 25 | 29 3e 3e 31 29 0d 01 72 |6+ysize%|)>>1)..r|
|000004b0| 13 c8 97 20 ee 3a 2a 70 | 6f 69 6e 74 65 72 20 31 |... .:*p|ointer 1|
|000004c0| 0d 01 7c 0f 67 61 6d 65 | 6f 76 65 72 25 3d a3 0d |..|.game|over%=..|
|000004d0| 01 86 1f 63 65 6c 6c 78 | 25 3d 31 3a 63 65 6c 6c |...cellx|%=1:cell|
|000004e0| 79 25 3d 31 3a 62 75 74 | 74 6f 6e 25 3d 30 0d 01 |y%=1:but|ton%=0..|
|000004f0| 90 05 f5 0d 01 9a 18 20 | 20 74 69 6d 65 6f 66 6c |....... | timeofl|
|00000500| 61 73 74 73 74 6f 72 6d | 25 3d 91 0d 01 a4 07 20 |aststorm|%=..... |
|00000510| 20 f5 0d 01 ae 0d 20 20 | 20 20 2a 46 58 31 35 0d | ..... | *FX15.|
|00000520| 01 b8 2b 20 20 20 20 f2 | 63 65 6c 6c 66 72 6f 6d |..+ .|cellfrom|
|00000530| 70 74 72 28 63 65 6c 6c | 78 25 2c 63 65 6c 6c 79 |ptr(cell|x%,celly|
|00000540| 25 2c 62 75 74 74 6f 6e | 25 29 0d 01 c2 14 20 20 |%,button|%).... |
|00000550| 20 20 c8 8e 20 62 75 74 | 74 6f 6e 25 20 ca 0d 01 | .. but|ton% ...|
|00000560| cc 0d 20 20 20 20 20 c9 | 20 31 3a 0d 01 d6 18 20 |.. .| 1:.... |
|00000570| 20 20 20 20 20 f4 20 65 | 78 70 6c 6f 64 65 20 6d | . e|xplode m|
|00000580| 69 6e 65 0d 01 e0 2e 20 | 20 20 20 20 20 e7 20 28 |ine.... | . (|
|00000590| a4 67 65 74 63 65 6c 6c | 28 63 65 6c 6c 78 25 2c |.getcell|(cellx%,|
|000005a0| 63 65 6c 6c 79 25 29 20 | 80 20 25 31 31 30 29 20 |celly%) |. %110) |
|000005b0| 8c 0d 01 ea 46 20 20 20 | 20 20 20 20 20 f4 20 63 |....F | . c|
|000005c0| 61 6e 6e 6f 74 20 64 65 | 74 6f 6e 61 74 65 20 61 |annot de|tonate a|
|000005d0| 20 63 65 6c 6c 20 77 68 | 69 63 68 20 69 73 20 61 | cell wh|ich is a|
|000005e0| 6c 72 65 61 64 79 20 63 | 6c 65 61 72 20 6f 72 20 |lready c|lear or |
|000005f0| 71 75 65 72 69 65 64 0d | 01 f4 0e 20 20 20 20 20 |queried.|... |
|00000600| 20 20 20 ef 37 0d 01 fe | 0c 20 20 20 20 20 20 20 | .7...|. |
|00000610| cc 0d 02 08 2d 20 20 20 | 20 20 20 20 20 e7 20 28 |....- | . (|
|00000620| a4 67 65 74 63 65 6c 6c | 28 63 65 6c 6c 78 25 2c |.getcell|(cellx%,|
|00000630| 63 65 6c 6c 79 25 29 20 | 80 20 31 29 20 8c 0d 02 |celly%) |. 1) ...|
|00000640| 12 2c 20 20 20 20 20 20 | 20 20 20 20 f2 73 65 74 |., | .set|
|00000650| 63 65 6c 6c 28 63 65 6c | 6c 78 25 2c 63 65 6c 6c |cell(cel|lx%,cell|
|00000660| 79 25 2c 25 30 31 30 31 | 30 29 0d 02 1c 39 20 20 |y%,%0101|0)...9 |
|00000670| 20 20 20 20 20 20 20 20 | 41 25 3d 67 72 69 64 25 | |A%=grid%|
|00000680| 3a 42 25 3d 78 73 69 7a | 65 25 3a 43 25 3d 79 73 |:B%=xsiz|e%:C%=ys|
|00000690| 69 7a 65 25 3a d6 6d 69 | 6e 65 61 64 6a 61 63 65 |ize%:.mi|neadjace|
|000006a0| 6e 63 79 0d 02 26 2d 20 | 20 20 20 20 20 20 20 20 |ncy..&- | |
|000006b0| 20 41 25 3d 67 72 69 64 | 25 3a 42 25 3d 67 72 69 | A%=grid|%:B%=gri|
|000006c0| 64 73 69 7a 65 25 3a 43 | 25 3d 67 72 69 64 32 25 |dsize%:C|%=grid2%|
|000006d0| 0d 02 30 17 20 20 20 20 | 20 20 20 20 20 20 d6 63 |..0. | .c|
|000006e0| 6f 70 79 67 72 69 64 0d | 02 3a 2a 20 20 20 20 20 |opygrid.|.:* |
|000006f0| 20 20 20 20 20 41 25 3d | 67 72 69 64 32 25 3a 43 | A%=|grid2%:C|
|00000700| 25 3d 67 72 69 64 25 3a | 44 25 3d 25 30 30 30 31 |%=grid%:|D%=%0001|
|00000710| 30 0d 02 44 1b 20 20 20 | 20 20 20 20 20 20 20 d6 |0..D. | .|
|00000720| 63 6f 70 79 63 6c 65 61 | 72 69 6e 67 0d 02 4e 2c |copyclea|ring..N,|
|00000730| 20 20 20 20 20 20 20 20 | 20 20 f2 73 65 74 63 65 | | .setce|
|00000740| 6c 6c 28 63 65 6c 6c 78 | 25 2c 63 65 6c 6c 79 25 |ll(cellx|%,celly%|
|00000750| 2c 25 30 31 30 31 30 29 | 0d 02 58 39 20 20 20 20 |,%01010)|..X9 |
|00000760| 20 20 20 20 20 20 41 25 | 3d 67 72 69 64 25 3a 42 | A%|=grid%:B|
|00000770| 25 3d 78 73 69 7a 65 25 | 3a 43 25 3d 79 73 69 7a |%=xsize%|:C%=ysiz|
|00000780| 65 25 3a d6 6d 69 6e 65 | 61 64 6a 61 63 65 6e 63 |e%:.mine|adjacenc|
|00000790| 79 0d 02 62 14 20 20 20 | 20 20 20 20 20 20 20 d6 |y..b. | .|
|000007a0| 63 6c 65 61 72 0d 02 6c | 36 20 20 20 20 20 20 20 |clear..l|6 |
|000007b0| 20 20 20 41 25 3d 67 72 | 69 64 25 3a 42 25 3d 67 | A%=gr|id%:B%=g|
|000007c0| 72 69 64 73 69 7a 65 25 | 3a 43 25 3d 67 72 69 64 |ridsize%|:C%=grid|
|000007d0| 25 3a 44 25 3d 67 72 69 | 64 32 25 0d 02 76 14 20 |%:D%=gri|d2%..v. |
|000007e0| 20 20 20 20 20 20 20 20 | 20 d6 6d 65 72 67 65 0d | | .merge.|
|000007f0| 02 80 37 20 20 20 20 20 | 20 20 20 20 20 f2 6f 72 |..7 | .or|
|00000800| 73 75 72 72 6f 75 6e 64 | 69 6e 67 63 65 6c 6c 73 |surround|ingcells|
|00000810| 28 63 65 6c 6c 78 25 2c | 63 65 6c 6c 79 25 2c 25 |(cellx%,|celly%,%|
|00000820| 30 31 30 30 30 29 0d 02 | 8a 2a 20 20 20 20 20 20 |01000)..|.* |
|00000830| 20 20 20 20 41 25 3d 67 | 72 69 64 25 3a 42 25 3d | A%=g|rid%:B%=|
|00000840| 78 73 69 7a 65 25 3a 43 | 25 3d 79 73 69 7a 65 25 |xsize%:C|%=ysize%|
|00000850| 0d 02 94 1b 20 20 20 20 | 20 20 20 20 20 20 d6 75 |.... | .u|
|00000860| 70 64 61 74 65 73 63 72 | 65 65 6e 0d 02 9e 1d 20 |pdatescr|een.... |
|00000870| 20 20 20 20 20 20 20 20 | 20 6e 6f 5f 6f 66 5f 6d | | no_of_m|
|00000880| 69 6e 65 73 25 2d 3d 31 | 0d 02 a8 2a 20 20 20 20 |ines%-=1|...* |
|00000890| 20 20 20 20 20 20 e7 20 | 6e 6f 5f 6f 66 5f 6d 69 | . |no_of_mi|
|000008a0| 6e 65 73 25 3d 30 20 67 | 61 6d 65 6f 76 65 72 25 |nes%=0 g|ameover%|
|000008b0| 3d b9 0d 02 b2 0e 20 20 | 20 20 20 20 20 20 20 cc |=..... | .|
|000008c0| 0d 02 bc 3b 20 20 20 20 | 20 20 20 20 20 20 41 25 |...; | A%|
|000008d0| 3d 67 72 69 64 25 3a 42 | 25 3d 67 72 69 64 73 69 |=grid%:B|%=gridsi|
|000008e0| 7a 65 25 3a 43 25 3d 67 | 72 69 64 25 3a d6 73 68 |ze%:C%=g|rid%:.sh|
|000008f0| 6f 77 6d 69 6e 65 73 63 | 6f 70 79 0d 02 c6 2a 20 |owminesc|opy...* |
|00000900| 20 20 20 20 20 20 20 20 | 20 41 25 3d 67 72 69 64 | | A%=grid|
|00000910| 25 3a 42 25 3d 78 73 69 | 7a 65 25 3a 43 25 3d 79 |%:B%=xsi|ze%:C%=y|
|00000920| 73 69 7a 65 25 0d 02 d0 | 1b 20 20 20 20 20 20 20 |size%...|. |
|00000930| 20 20 20 d6 75 70 64 61 | 74 65 73 63 72 65 65 6e | .upda|tescreen|
|00000940| 0d 02 da 19 20 20 20 20 | 20 20 20 20 20 20 67 61 |.... | ga|
|00000950| 6d 65 6f 76 65 72 25 3d | b9 0d 02 e4 0e 20 20 20 |meover%=|..... |
|00000960| 20 20 20 20 20 20 cd 0d | 02 ee 0c 20 20 20 20 20 | ..|... |
|00000970| 20 20 cd 0d 02 f8 0d 20 | 20 20 20 20 c9 20 32 3a | ..... | . 2:|
|00000980| 0d 03 02 16 20 20 20 20 | 20 20 f4 20 71 75 65 72 |.... | . quer|
|00000990| 79 20 63 65 6c 6c 0d 03 | 0c 2f 20 20 20 20 20 20 |y cell..|./ |
|000009a0| e7 20 28 a4 67 65 74 63 | 65 6c 6c 28 63 65 6c 6c |. (.getc|ell(cell|
|000009b0| 78 25 2c 63 65 6c 6c 79 | 25 29 20 80 20 25 31 30 |x%,celly|%) . %10|
|000009c0| 29 3d 30 20 8c 0d 03 16 | 30 20 20 20 20 20 20 20 |)=0 ....|0 |
|000009d0| 20 e7 20 28 a4 67 65 74 | 63 65 6c 6c 28 63 65 6c | . (.get|cell(cel|
|000009e0| 6c 78 25 2c 63 65 6c 6c | 79 25 29 20 80 20 25 31 |lx%,cell|y%) . %1|
|000009f0| 30 30 29 20 8c 0d 03 20 | 47 20 20 20 20 20 20 20 |00) ... |G |
|00000a00| 20 20 20 f2 73 65 74 63 | 65 6c 6c 28 63 65 6c 6c | .setc|ell(cell|
|00000a10| 78 25 2c 63 65 6c 6c 79 | 25 2c a4 67 65 74 63 65 |x%,celly|%,.getce|
|00000a20| 6c 6c 28 63 65 6c 6c 78 | 25 2c 63 65 6c 6c 79 25 |ll(cellx|%,celly%|
|00000a30| 29 20 80 20 28 ac 25 31 | 30 30 29 29 0d 03 2a 45 |) . (.%1|00))..*E|
|00000a40| 20 20 20 20 20 20 20 20 | 20 20 f2 73 65 74 63 65 | | .setce|
|00000a50| 6c 6c 28 63 65 6c 6c 78 | 25 2c 63 65 6c 6c 79 25 |ll(cellx|%,celly%|
|00000a60| 2c a4 67 65 74 63 65 6c | 6c 28 63 65 6c 6c 78 25 |,.getcel|l(cellx%|
|00000a70| 2c 63 65 6c 6c 79 25 29 | 20 84 20 25 31 30 30 30 |,celly%)| . %1000|
|00000a80| 29 0d 03 34 0e 20 20 20 | 20 20 20 20 20 20 cc 0d |)..4. | ..|
|00000a90| 03 3e 45 20 20 20 20 20 | 20 20 20 20 20 f2 73 65 |.>E | .se|
|00000aa0| 74 63 65 6c 6c 28 63 65 | 6c 6c 78 25 2c 63 65 6c |tcell(ce|llx%,cel|
|00000ab0| 6c 79 25 2c a4 67 65 74 | 63 65 6c 6c 28 63 65 6c |ly%,.get|cell(cel|
|00000ac0| 6c 78 25 2c 63 65 6c 6c | 79 25 29 20 84 20 25 31 |lx%,cell|y%) . %1|
|00000ad0| 31 30 30 29 0d 03 48 0e | 20 20 20 20 20 20 20 20 |100)..H.| |
|00000ae0| 20 cd 0d 03 52 36 20 20 | 20 20 20 20 20 20 41 25 | ...R6 | A%|
|00000af0| 3d 67 72 69 64 25 3a 42 | 25 3d 78 73 69 7a 65 25 |=grid%:B|%=xsize%|
|00000b00| 3a 43 25 3d 79 73 69 7a | 65 25 3a d6 75 70 64 61 |:C%=ysiz|e%:.upda|
|00000b10| 74 65 73 63 72 65 65 6e | 0d 03 5c 0c 20 20 20 20 |tescreen|..\. |
|00000b20| 20 20 20 cd 0d 03 66 0d | 20 20 20 20 20 c9 20 34 | ...f.| . 4|
|00000b30| 3a 0d 03 70 16 20 20 20 | 20 20 20 f4 20 63 6c 65 |:..p. | . cle|
|00000b40| 61 72 20 63 65 6c 6c 0d | 03 7a 30 20 20 20 20 20 |ar cell.|.z0 |
|00000b50| 20 e7 20 28 a4 67 65 74 | 63 65 6c 6c 28 63 65 6c | . (.get|cell(cel|
|00000b60| 6c 78 25 2c 63 65 6c 6c | 79 25 29 20 80 20 25 31 |lx%,cell|y%) . %1|
|00000b70| 30 30 29 3d 30 20 8c 0d | 03 84 29 20 20 20 20 20 |00)=0 ..|..) |
|00000b80| 20 20 20 f4 20 63 61 6e | 6e 6f 74 20 63 6c 65 61 | . can|not clea|
|00000b90| 72 20 61 20 71 75 65 72 | 69 65 64 20 63 65 6c 6c |r a quer|ied cell|
|00000ba0| 0d 03 8e 30 20 20 20 20 | 20 20 20 20 e7 20 28 a4 |...0 | . (.|
|00000bb0| 67 65 74 63 65 6c 6c 28 | 63 65 6c 6c 78 25 2c 63 |getcell(|cellx%,c|
|00000bc0| 65 6c 6c 79 25 29 20 80 | 20 25 31 29 3d 31 20 8c |elly%) .| %1)=1 .|
|00000bd0| 0d 03 98 3b 20 20 20 20 | 20 20 20 20 20 20 41 25 |...; | A%|
|00000be0| 3d 67 72 69 64 25 3a 42 | 25 3d 67 72 69 64 73 69 |=grid%:B|%=gridsi|
|00000bf0| 7a 65 25 3a 43 25 3d 67 | 72 69 64 25 3a d6 73 68 |ze%:C%=g|rid%:.sh|
|00000c00| 6f 77 6d 69 6e 65 73 63 | 6f 70 79 0d 03 a2 2a 20 |owminesc|opy...* |
|00000c10| 20 20 20 20 20 20 20 20 | 20 41 25 3d 67 72 69 64 | | A%=grid|
|00000c20| 25 3a 42 25 3d 78 73 69 | 7a 65 25 3a 43 25 3d 79 |%:B%=xsi|ze%:C%=y|
|00000c30| 73 69 7a 65 25 0d 03 ac | 1b 20 20 20 20 20 20 20 |size%...|. |
|00000c40| 20 20 20 d6 75 70 64 61 | 74 65 73 63 72 65 65 6e | .upda|tescreen|
|00000c50| 0d 03 b6 19 20 20 20 20 | 20 20 20 20 20 20 67 61 |.... | ga|
|00000c60| 6d 65 6f 76 65 72 25 3d | b9 0d 03 c0 0e 20 20 20 |meover%=|..... |
|00000c70| 20 20 20 20 20 20 cc 0d | 03 ca 2d 20 20 20 20 20 | ..|..- |
|00000c80| 20 20 20 20 20 41 25 3d | 67 72 69 64 25 3a 42 25 | A%=|grid%:B%|
|00000c90| 3d 67 72 69 64 73 69 7a | 65 25 3a 43 25 3d 67 72 |=gridsiz|e%:C%=gr|
|00000ca0| 69 64 32 25 0d 03 d4 17 | 20 20 20 20 20 20 20 20 |id2%....| |
|00000cb0| 20 20 d6 63 6f 70 79 67 | 72 69 64 0d 03 de 37 20 | .copyg|rid...7 |
|00000cc0| 20 20 20 20 20 20 20 20 | 20 41 25 3d 67 72 69 64 | | A%=grid|
|00000cd0| 32 25 3a 42 25 3d 67 72 | 69 64 73 69 7a 65 25 3a |2%:B%=gr|idsize%:|
|00000ce0| 43 25 3d 67 72 69 64 25 | 3a 44 25 3d 25 30 30 30 |C%=grid%|:D%=%000|
|00000cf0| 31 30 0d 03 e8 1b 20 20 | 20 20 20 20 20 20 20 20 |10.... | |
|00000d00| d6 63 6f 70 79 63 6c 65 | 61 72 69 6e 67 0d 03 f2 |.copycle|aring...|
|00000d10| 2c 20 20 20 20 20 20 20 | 20 20 20 f2 73 65 74 63 |, | .setc|
|00000d20| 65 6c 6c 28 63 65 6c 6c | 78 25 2c 63 65 6c 6c 79 |ell(cell|x%,celly|
|00000d30| 25 2c 25 30 31 30 31 30 | 29 0d 03 fc 39 20 20 20 |%,%01010|)...9 |
|00000d40| 20 20 20 20 20 20 20 41 | 25 3d 67 72 69 64 25 3a | A|%=grid%:|
|00000d50| 42 25 3d 78 73 69 7a 65 | 25 3a 43 25 3d 79 73 69 |B%=xsize|%:C%=ysi|
|00000d60| 7a 65 25 3a d6 6d 69 6e | 65 61 64 6a 61 63 65 6e |ze%:.min|eadjacen|
|00000d70| 63 79 0d 04 06 14 20 20 | 20 20 20 20 20 20 20 20 |cy.... | |
|00000d80| d6 63 6c 65 61 72 0d 04 | 10 2d 20 20 20 20 20 20 |.clear..|.- |
|00000d90| 20 20 20 20 42 25 3d 67 | 72 69 64 73 69 7a 65 25 | B%=g|ridsize%|
|00000da0| 3a 43 25 3d 67 72 69 64 | 25 3a 44 25 3d 67 72 69 |:C%=grid|%:D%=gri|
|00000db0| 64 32 25 0d 04 1a 14 20 | 20 20 20 20 20 20 20 20 |d2%.... | |
|00000dc0| 20 d6 6d 65 72 67 65 0d | 04 24 21 20 20 20 20 20 | .merge.|.$! |
|00000dd0| 20 20 20 20 20 42 25 3d | 78 73 69 7a 65 25 3a 43 | B%=|xsize%:C|
|00000de0| 25 3d 79 73 69 7a 65 25 | 0d 04 2e 1b 20 20 20 20 |%=ysize%|.... |
|00000df0| 20 20 20 20 20 20 d6 75 | 70 64 61 74 65 73 63 72 | .u|pdatescr|
|00000e00| 65 65 6e 0d 04 38 0e 20 | 20 20 20 20 20 20 20 20 |een..8. | |
|00000e10| cd 0d 04 42 0c 20 20 20 | 20 20 20 20 cd 0d 04 4c |...B. | ...L|
|00000e20| 0a 20 20 20 20 20 cb 0d | 04 56 13 20 20 20 20 e7 |. ..|.V. .|
|00000e30| 20 62 75 74 74 6f 6e 25 | 20 8c 0d 04 60 56 20 20 | button%| ...`V |
|00000e40| 20 20 20 f2 70 72 69 6e | 74 63 65 6e 74 72 65 64 | .prin|tcentred|
|00000e50| 28 22 4d 69 6e 65 73 20 | 6c 65 66 74 3a 22 2b c3 |("Mines |left:"+.|
|00000e60| 28 6e 6f 5f 6f 66 5f 6d | 69 6e 65 73 25 29 2c 32 |(no_of_m|ines%),2|
|00000e70| 2b 28 76 64 75 76 61 72 | 69 61 62 6c 65 6c 69 73 |+(vduvar|iablelis|
|00000e80| 74 21 31 36 2b 79 73 69 | 7a 65 25 29 3e 3e 31 29 |t!16+ysi|ze%)>>1)|
|00000e90| 0d 04 6a 26 20 20 20 20 | 20 20 f5 20 c8 97 20 74 |..j& | . .. t|
|00000ea0| 65 6d 70 6d 78 25 2c 74 | 65 6d 70 6d 79 25 2c 74 |empmx%,t|empmy%,t|
|00000eb0| 65 6d 70 6d 62 25 0d 04 | 74 16 20 20 20 20 20 20 |empmb%..|t. |
|00000ec0| 20 fd 20 74 65 6d 70 6d | 62 25 3d 30 0d 04 7e 0a | . tempm|b%=0..~.|
|00000ed0| 20 20 20 20 20 cd 0d 04 | 88 32 20 20 20 fd 20 67 | ...|.2 . g|
|00000ee0| 61 6d 65 6f 76 65 72 25 | 20 84 20 91 2d 74 69 6d |ameover%| . .-tim|
|00000ef0| 65 6f 66 6c 61 73 74 73 | 74 6f 72 6d 25 3e 73 74 |eoflasts|torm%>st|
|00000f00| 6f 72 6d 74 69 6d 65 25 | 0d 04 92 16 20 20 e7 20 |ormtime%|.... . |
|00000f10| ac 28 67 61 6d 65 6f 76 | 65 72 25 29 20 8c 0d 04 |.(gameov|er%) ...|
|00000f20| 9c 1a 20 20 20 20 f2 66 | 61 64 65 74 6f 62 6c 61 |.. .f|adetobla|
|00000f30| 63 6b 3a da 3a db 3a 87 | 0d 04 a6 0f 20 20 20 20 |ck:.:.:.|.... |
|00000f40| f4 20 53 74 6f 72 6d 0d | 04 b0 24 20 20 20 20 41 |. Storm.|..$ A|
|00000f50| 25 3d 67 72 69 64 25 3a | 42 25 3d 78 73 69 7a 65 |%=grid%:|B%=xsize|
|00000f60| 25 3a 43 25 3d 79 73 69 | 7a 65 25 0d 04 ba 1b 20 |%:C%=ysi|ze%.... |
|00000f70| 20 20 20 44 25 3d 25 30 | 30 30 31 30 3a f4 20 63 | D%=%0|0010:. c|
|00000f80| 6c 65 61 72 65 64 0d 04 | c4 14 20 20 20 20 d6 73 |leared..|.. .s|
|00000f90| 65 74 62 6f 75 6e 64 61 | 72 79 0d 04 ce 11 20 20 |etbounda|ry.... |
|00000fa0| 20 20 44 25 3d 67 72 69 | 64 32 25 0d 04 d8 19 20 | D%=gri|d2%.... |
|00000fb0| 20 20 20 d6 75 6e 6b 6e | 6f 77 6e 61 64 6a 61 63 | .unkn|ownadjac|
|00000fc0| 65 6e 63 79 0d 04 e2 11 | 20 20 20 20 41 25 3d 67 |ency....| A%=g|
|00000fd0| 72 69 64 32 25 0d 04 ec | 11 20 20 20 20 44 25 3d |rid2%...|. D%=|
|00000fe0| 25 30 30 30 31 30 0d 04 | f6 14 20 20 20 20 d6 73 |%00010..|.. .s|
|00000ff0| 65 74 62 6f 75 6e 64 61 | 72 79 0d 05 00 10 20 20 |etbounda|ry.... |
|00001000| 20 20 44 25 3d 67 72 69 | 64 25 0d 05 0a 19 20 20 | D%=gri|d%.... |
|00001010| 20 20 d6 75 6e 6b 6e 6f | 77 6e 61 64 6a 61 63 65 | .unkno|wnadjace|
|00001020| 6e 63 79 0d 05 14 10 20 | 20 20 20 41 25 3d 67 72 |ncy.... | A%=gr|
|00001030| 69 64 25 0d 05 1e 15 20 | 20 20 20 d6 75 70 64 61 |id%.... | .upda|
|00001040| 74 65 73 63 72 65 65 6e | 0d 05 28 37 20 20 20 20 |tescreen|..(7 |
|00001050| f2 73 74 6f 72 6d 28 67 | 72 69 64 25 2c 67 72 69 |.storm(g|rid%,gri|
|00001060| 64 32 25 2c 6e 6f 5f 6f | 66 5f 6d 69 6e 65 73 25 |d2%,no_o|f_mines%|
|00001070| 2c 78 73 69 7a 65 25 2c | 79 73 69 7a 65 25 29 0d |,xsize%,|ysize%).|
|00001080| 05 32 12 20 20 20 20 f2 | 6c 69 67 68 74 6e 69 6e |.2. .|lightnin|
|00001090| 67 0d 05 3c 15 20 20 20 | 20 f2 72 65 64 72 61 77 |g..<. | .redraw|
|000010a0| 73 63 72 65 65 6e 0d 05 | 46 13 20 20 20 20 f2 66 |screen..|F. .f|
|000010b0| 61 64 65 62 61 63 6b 69 | 6e 0d 05 50 08 20 20 20 |adebacki|n..P. |
|000010c0| cd 0d 05 5a 0f 20 fd 67 | 61 6d 65 6f 76 65 72 25 |...Z. .g|ameover%|
|000010d0| 0d 05 64 65 e7 20 6e 6f | 5f 6f 66 5f 6d 69 6e 65 |..de. no|_of_mine|
|000010e0| 73 25 20 f2 70 72 69 6e | 74 63 65 6e 74 72 65 64 |s% .prin|tcentred|
|000010f0| 28 22 53 6f 72 72 79 2c | 20 79 6f 75 20 6d 61 64 |("Sorry,| you mad|
|00001100| 65 20 61 20 6d 69 73 74 | 61 6b 65 22 2c 32 2b 28 |e a mist|ake",2+(|
|00001110| 76 64 75 76 61 72 69 61 | 62 6c 65 6c 69 73 74 21 |vduvaria|blelist!|
|00001120| 31 36 2b 79 73 69 7a 65 | 25 29 3e 3e 31 29 20 8b |16+ysize|%)>>1) .|
|00001130| 20 f2 77 6f 6e 0d 05 6e | 51 f2 70 72 69 6e 74 63 | .won..n|Q.printc|
|00001140| 65 6e 74 72 65 64 28 22 | 50 72 65 73 73 20 61 6e |entred("|Press an|
|00001150| 79 20 6b 65 79 20 74 6f | 20 70 6c 61 79 20 61 67 |y key to| play ag|
|00001160| 61 69 6e 22 2c 33 2b 28 | 76 64 75 76 61 72 69 61 |ain",3+(|vduvaria|
|00001170| 62 6c 65 6c 69 73 74 21 | 31 36 2b 79 73 69 7a 65 |blelist!|16+ysize|
|00001180| 25 29 3e 3e 31 29 0d 05 | 78 2d f5 fd a6 28 2d 31 |%)>>1)..|x-...(-1|
|00001190| 34 37 29 3c 3e 32 35 35 | 20 84 20 a6 28 2d 31 30 |47)<>255| . .(-10|
|000011a0| 29 20 84 20 a6 28 2d 31 | 31 29 20 84 20 a6 28 2d |) . .(-1|1) . .(-|
|000011b0| 31 32 29 0d 05 82 05 f9 | 0d 05 8c 05 3a 0d 05 96 |12).....|....:...|
|000011c0| 11 dd 20 f2 70 6c 61 63 | 65 6d 69 6e 65 73 0d 05 |.. .plac|emines..|
|000011d0| a0 12 ea 20 78 25 2c 79 | 25 2c 63 6f 75 6e 74 25 |... x%,y|%,count%|
|000011e0| 0d 05 aa 1d e3 20 63 6f | 75 6e 74 25 3d 31 20 b8 |..... co|unt%=1 .|
|000011f0| 20 6e 6f 5f 6f 66 5f 6d | 69 6e 65 73 25 0d 05 b4 | no_of_m|ines%...|
|00001200| 07 20 20 f5 0d 05 be 21 | 20 20 20 20 78 25 3d b3 |. ....!| x%=.|
|00001210| 28 78 73 69 7a 65 25 29 | 3a 79 25 3d b3 28 79 73 |(xsize%)|:y%=.(ys|
|00001220| 69 7a 65 25 29 0d 05 c8 | 64 20 20 20 fd 20 28 a4 |ize%)...|d . (.|
|00001230| 67 65 74 63 65 6c 6c 28 | 78 25 2c 79 25 29 20 80 |getcell(|x%,y%) .|
|00001240| 20 31 29 3d 30 20 80 20 | ac 28 28 78 25 3d 31 20 | 1)=0 . |.((x%=1 |
|00001250| 80 20 28 79 25 3d 31 20 | 84 20 79 25 3d 79 73 69 |. (y%=1 |. y%=ysi|
|00001260| 7a 65 25 29 29 20 84 20 | 28 78 25 3d 78 73 69 7a |ze%)) . |(x%=xsiz|
|00001270| 65 25 20 80 20 28 79 25 | 3d 31 20 84 20 79 25 3d |e% . (y%|=1 . y%=|
|00001280| 79 73 69 7a 65 25 29 29 | 29 0d 05 d2 1c 20 20 f2 |ysize%))|).... .|
|00001290| 73 65 74 63 65 6c 6c 28 | 78 25 2c 79 25 2c 25 31 |setcell(|x%,y%,%1|
|000012a0| 31 30 30 31 29 0d 05 dc | 06 20 ed 0d 05 e6 05 e1 |1001)...|. ......|
|000012b0| 0d 05 f0 05 3a 0d 05 fa | 10 dd 20 f2 70 72 69 6e |....:...|.. .prin|
|000012c0| 74 67 72 69 64 0d 06 04 | 0b ea 20 78 25 2c 79 25 |tgrid...|.. x%,y%|
|000012d0| 0d 06 0e 21 e3 78 25 3d | 31 20 b8 20 78 73 69 7a |...!.x%=|1 . xsiz|
|000012e0| 65 25 3a e3 79 25 3d 31 | 20 b8 20 79 73 69 7a 65 |e%:.y%=1| . ysize|
|000012f0| 25 0d 06 18 32 20 20 f1 | 8a 78 25 2d 31 2c 79 73 |%...2 .|.x%-1,ys|
|00001300| 69 7a 65 25 2d 79 25 29 | 3b 7e 3f 28 67 72 69 64 |ize%-y%)|;~?(grid|
|00001310| 25 2b 28 78 73 69 7a 65 | 25 2b 32 29 2a 79 25 2b |%+(xsize|%+2)*y%+|
|00001320| 78 25 29 0d 06 22 06 ed | 2c 0d 06 2c 07 47 3d a5 |x%).."..|,..,.G=.|
|00001330| 0d 06 36 05 e1 0d 06 40 | 05 3a 0d 06 4a 1a dd 20 |..6....@|.:..J.. |
|00001340| f2 73 65 74 63 65 6c 6c | 28 78 25 2c 79 25 2c 76 |.setcell|(x%,y%,v|
|00001350| 61 6c 25 29 0d 06 54 22 | 3f 28 67 72 69 64 25 2b |al%)..T"|?(grid%+|
|00001360| 28 78 73 69 7a 65 25 2b | 32 29 2a 79 25 2b 78 25 |(xsize%+|2)*y%+x%|
|00001370| 29 3d 76 61 6c 25 0d 06 | 5e 05 e1 0d 06 68 05 3a |)=val%..|^....h.:|
|00001380| 0d 06 72 19 dd 20 f2 6f | 72 63 65 6c 6c 28 78 25 |..r.. .o|rcell(x%|
|00001390| 2c 79 25 2c 76 61 6c 25 | 29 0d 06 7c 3e 3f 28 67 |,y%,val%|)..|>?(g|
|000013a0| 72 69 64 25 2b 28 78 73 | 69 7a 65 25 2b 32 29 2a |rid%+(xs|ize%+2)*|
|000013b0| 79 25 2b 78 25 29 3d 3f | 28 67 72 69 64 25 2b 28 |y%+x%)=?|(grid%+(|
|000013c0| 78 73 69 7a 65 25 2b 32 | 29 2a 79 25 2b 78 25 29 |xsize%+2|)*y%+x%)|
|000013d0| 20 84 20 76 61 6c 25 0d | 06 86 05 e1 0d 06 90 05 | . val%.|........|
|000013e0| 3a 0d 06 9a 25 dd 20 f2 | 6f 72 73 75 72 72 6f 75 |:...%. .|orsurrou|
|000013f0| 6e 64 69 6e 67 63 65 6c | 6c 73 28 78 25 2c 79 25 |ndingcel|ls(x%,y%|
|00001400| 2c 76 61 6c 25 29 0d 06 | a4 1b f2 6f 72 63 65 6c |,val%)..|...orcel|
|00001410| 6c 28 78 25 2d 31 2c 79 | 25 2d 31 2c 76 61 6c 25 |l(x%-1,y|%-1,val%|
|00001420| 29 0d 06 ae 19 f2 6f 72 | 63 65 6c 6c 28 78 25 2c |).....or|cell(x%,|
|00001430| 79 25 2d 31 2c 76 61 6c | 25 29 0d 06 b8 1b f2 6f |y%-1,val|%).....o|
|00001440| 72 63 65 6c 6c 28 78 25 | 2b 31 2c 79 25 2d 31 2c |rcell(x%|+1,y%-1,|
|00001450| 76 61 6c 25 29 0d 06 c2 | 19 f2 6f 72 63 65 6c 6c |val%)...|..orcell|
|00001460| 28 78 25 2d 31 2c 79 25 | 2c 76 61 6c 25 29 0d 06 |(x%-1,y%|,val%)..|
|00001470| cc 19 f2 6f 72 63 65 6c | 6c 28 78 25 2b 31 2c 79 |...orcel|l(x%+1,y|
|00001480| 25 2c 76 61 6c 25 29 0d | 06 d6 1b f2 6f 72 63 65 |%,val%).|....orce|
|00001490| 6c 6c 28 78 25 2d 31 2c | 79 25 2b 31 2c 76 61 6c |ll(x%-1,|y%+1,val|
|000014a0| 25 29 0d 06 e0 19 f2 6f | 72 63 65 6c 6c 28 78 25 |%).....o|rcell(x%|
|000014b0| 2c 79 25 2b 31 2c 76 61 | 6c 25 29 0d 06 ea 1b f2 |,y%+1,va|l%).....|
|000014c0| 6f 72 63 65 6c 6c 28 78 | 25 2b 31 2c 79 25 2b 31 |orcell(x|%+1,y%+1|
|000014d0| 2c 76 61 6c 25 29 0d 06 | f4 05 e1 0d 06 fe 05 3a |,val%)..|.......:|
|000014e0| 0d 07 08 15 dd 20 a4 67 | 65 74 63 65 6c 6c 28 78 |..... .g|etcell(x|
|000014f0| 25 2c 79 25 29 0d 07 12 | 1e 3d 3f 28 67 72 69 64 |%,y%)...|.=?(grid|
|00001500| 25 2b 28 78 73 69 7a 65 | 25 2b 32 29 2a 79 25 2b |%+(xsize|%+2)*y%+|
|00001510| 78 25 29 0d 07 1c 05 3a | 0d 07 26 25 dd 20 f2 63 |x%)....:|..&%. .c|
|00001520| 65 6c 6c 66 72 6f 6d 70 | 74 72 28 f8 20 63 78 25 |ellfromp|tr(. cx%|
|00001530| 2c f8 20 63 79 25 2c f8 | 20 6d 62 25 29 0d 07 30 |,. cy%,.| mb%)..0|
|00001540| 0d ea 20 6d 78 25 2c 6d | 79 25 0d 07 3a 12 c8 97 |.. mx%,m|y%..:...|
|00001550| 20 6d 78 25 2c 6d 79 25 | 2c 6d 62 25 0d 07 44 45 | mx%,my%|,mb%..DE|
|00001560| 6d 78 25 2d 3d 28 28 28 | 76 64 75 76 61 72 69 61 |mx%-=(((|vduvaria|
|00001570| 62 6c 65 6c 69 73 74 21 | 31 32 2b 31 2d 78 73 69 |blelist!|12+1-xsi|
|00001580| 7a 65 25 29 3e 3e 31 29 | 3c 3c 28 33 2b 76 64 75 |ze%)>>1)|<<(3+vdu|
|00001590| 76 61 72 69 61 62 6c 65 | 6c 69 73 74 21 32 30 29 |variable|list!20)|
|000015a0| 29 0d 07 4e 45 6d 79 25 | 2b 3d 28 28 28 76 64 75 |)..NEmy%|+=(((vdu|
|000015b0| 76 61 72 69 61 62 6c 65 | 6c 69 73 74 21 31 36 2b |variable|list!16+|
|000015c0| 31 2d 79 73 69 7a 65 25 | 29 3e 3e 31 29 3c 3c 28 |1-ysize%|)>>1)<<(|
|000015d0| 33 2b 76 64 75 76 61 72 | 69 61 62 6c 65 6c 69 73 |3+vduvar|iablelis|
|000015e0| 74 21 32 34 29 29 0d 07 | 58 27 63 78 25 3d 31 2b |t!24))..|X'cx%=1+|
|000015f0| 28 6d 78 25 3e 3e 28 33 | 2b 76 64 75 76 61 72 69 |(mx%>>(3|+vduvari|
|00001600| 61 62 6c 65 6c 69 73 74 | 21 32 30 29 29 0d 07 62 |ablelist|!20))..b|
|00001610| 11 e7 20 63 78 25 3c 31 | 20 63 78 25 3d 31 0d 07 |.. cx%<1| cx%=1..|
|00001620| 6c 1b e7 20 63 78 25 3e | 78 73 69 7a 65 25 20 63 |l.. cx%>|xsize% c|
|00001630| 78 25 3d 78 73 69 7a 65 | 25 0d 07 76 3f 63 79 25 |x%=xsize|%..v?cy%|
|00001640| 3d 28 6d 79 25 3e 3e 28 | 33 2b 76 64 75 76 61 72 |=(my%>>(|3+vduvar|
|00001650| 69 61 62 6c 65 6c 69 73 | 74 21 32 34 29 29 2d 76 |iablelis|t!24))-v|
|00001660| 64 75 76 61 72 69 61 62 | 6c 65 6c 69 73 74 21 31 |duvariab|lelist!1|
|00001670| 36 2b 79 73 69 7a 65 25 | 0d 07 80 11 e7 20 63 79 |6+ysize%|..... cy|
|00001680| 25 3c 31 20 63 79 25 3d | 31 0d 07 8a 1b e7 20 63 |%<1 cy%=|1..... c|
|00001690| 79 25 3e 79 73 69 7a 65 | 25 20 63 79 25 3d 79 73 |y%>ysize|% cy%=ys|
|000016a0| 69 7a 65 25 0d 07 94 05 | e1 0d 07 9e 05 3a 0d 07 |ize%....|.....:..|
|000016b0| a8 17 dd 20 f2 61 73 73 | 65 6d 62 6c 65 67 72 69 |... .ass|emblegri|
|000016c0| 64 63 6f 64 65 0d 07 b2 | 0b ea 20 70 61 73 73 25 |dcode...|.. pass%|
|000016d0| 0d 07 bc 10 de 20 63 6f | 64 65 25 20 32 30 34 38 |..... co|de% 2048|
|000016e0| 0d 07 c6 15 e3 20 70 61 | 73 73 25 3d 30 20 b8 20 |..... pa|ss%=0 . |
|000016f0| 32 20 88 20 32 0d 07 d0 | 0c 50 25 3d 63 6f 64 65 |2 . 2...|.P%=code|
|00001700| 25 0d 07 da 0e 5b 4f 50 | 54 20 70 61 73 73 25 0d |%....[OP|T pass%.|
|00001710| 07 e4 11 3b 20 63 65 6c | 6c 20 66 6c 61 67 73 3a |...; cel|l flags:|
|00001720| 0d 07 ee 22 3b 20 62 69 | 74 20 20 20 20 73 65 74 |..."; bi|t set|
|00001730| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 75 6e 73 | | uns|
|00001740| 65 74 0d 07 f8 24 3b 20 | 20 30 20 20 20 20 20 6d |et...$; | 0 m|
|00001750| 69 6e 65 20 20 20 20 20 | 20 20 20 20 20 20 20 6e |ine | n|
|00001760| 6f 20 6d 69 6e 65 0d 08 | 02 28 3b 20 20 31 20 20 |o mine..|.(; 1 |
|00001770| 20 20 20 63 6c 65 61 72 | 20 20 20 20 20 20 20 20 | clear| |
|00001780| 20 20 20 6e 6f 74 20 63 | 6c 65 61 72 65 64 0d 08 | not c|leared..|
|00001790| 0c 43 3b 20 20 32 20 20 | 20 20 20 71 75 65 72 69 |.C; 2 | queri|
|000017a0| 65 64 20 20 20 20 20 20 | 20 20 20 6e 6f 74 20 71 |ed | not q|
|000017b0| 75 65 72 69 65 64 20 28 | 6e 6f 20 66 6c 61 67 73 |ueried (|no flags|
|000017c0| 20 6f 6e 20 74 68 69 73 | 20 76 65 72 73 69 6f 6e | on this| version|
|000017d0| 29 0d 08 16 37 3b 20 20 | 33 20 20 20 20 20 63 68 |)...7; |3 ch|
|000017e0| 61 6e 67 65 64 20 20 20 | 20 20 20 20 20 20 6e 6f |anged | no|
|000017f0| 20 63 68 61 6e 67 65 20 | 74 6f 20 73 63 72 65 65 | change |to scree|
|00001800| 6e 20 6e 65 65 64 65 64 | 0d 08 20 37 3b 20 20 34 |n needed|.. 7; 4|
|00001810| 20 20 20 20 20 61 64 6a | 61 63 65 6e 74 20 6d 69 | adj|acent mi|
|00001820| 6e 65 2f 73 20 63 65 6c | 6c 20 68 61 73 20 6e 6f |ne/s cel|l has no|
|00001830| 20 61 64 6a 61 63 65 6e | 74 20 6d 69 6e 65 73 0d | adjacen|t mines.|
|00001840| 08 2a 0e 2e 63 6c 65 61 | 72 67 72 69 64 0d 08 34 |.*..clea|rgrid..4|
|00001850| 30 3b 20 6f 6e 20 65 6e | 74 72 79 2c 20 52 30 3d |0; on en|try, R0=|
|00001860| 62 61 73 65 25 2c 20 52 | 31 3d 67 72 69 64 73 69 |base%, R|1=gridsi|
|00001870| 7a 65 25 2c 20 52 32 3d | 76 61 6c 75 65 0d 08 3e |ze%, R2=|value..>|
|00001880| 11 53 55 42 53 20 52 31 | 2c 52 31 2c 23 31 0d 08 |.SUBS R1|,R1,#1..|
|00001890| 48 13 53 54 52 42 20 52 | 32 2c 5b 52 30 2c 52 31 |H.STRB R|2,[R0,R1|
|000018a0| 5d 0d 08 52 11 42 47 54 | 20 63 6c 65 61 72 67 72 |]..R.BGT| cleargr|
|000018b0| 69 64 0d 08 5c 0e 4d 4f | 56 20 50 43 2c 52 31 34 |id..\.MO|V PC,R14|
|000018c0| 0d 08 66 05 3b 0d 08 70 | 0d 2e 63 6f 70 79 67 72 |..f.;..p|..copygr|
|000018d0| 69 64 0d 08 7a 32 3b 20 | 6f 6e 20 65 6e 74 72 79 |id..z2; |on entry|
|000018e0| 2c 20 52 30 3d 73 6f 75 | 72 63 65 25 2c 20 52 31 |, R0=sou|rce%, R1|
|000018f0| 3d 67 72 69 64 73 69 7a | 65 25 2c 20 52 32 3d 64 |=gridsiz|e%, R2=d|
|00001900| 65 73 74 25 0d 08 84 11 | 53 55 42 53 20 52 31 2c |est%....|SUBS R1,|
|00001910| 52 31 2c 23 31 0d 08 8e | 13 4c 44 52 42 20 52 33 |R1,#1...|.LDRB R3|
|00001920| 2c 5b 52 30 2c 52 31 5d | 0d 08 98 13 53 54 52 42 |,[R0,R1]|....STRB|
|00001930| 20 52 33 2c 5b 52 32 2c | 52 31 5d 0d 08 a2 10 42 | R3,[R2,|R1]....B|
|00001940| 47 54 20 63 6f 70 79 67 | 72 69 64 0d 08 ac 0e 4d |GT copyg|rid....M|
|00001950| 4f 56 20 50 43 2c 52 31 | 34 0d 08 b6 05 3b 0d 08 |OV PC,R1|4....;..|
|00001960| c0 11 2e 63 6f 70 79 63 | 6c 65 61 72 69 6e 67 0d |...copyc|learing.|
|00001970| 08 ca 3b 3b 20 6f 6e 20 | 65 6e 74 72 79 2c 20 52 |..;; on |entry, R|
|00001980| 30 3d 73 6f 75 72 63 65 | 25 2c 20 52 31 3d 67 72 |0=source|%, R1=gr|
|00001990| 69 64 73 69 7a 65 25 2c | 20 52 32 3d 64 65 73 74 |idsize%,| R2=dest|
|000019a0| 25 2c 20 52 33 3d 6d 61 | 73 6b 0d 08 d4 11 53 55 |%, R3=ma|sk....SU|
|000019b0| 42 53 20 52 31 2c 52 31 | 2c 23 31 0d 08 de 13 4c |BS R1,R1|,#1....L|
|000019c0| 44 52 42 20 52 34 2c 5b | 52 30 2c 52 31 5d 0d 08 |DRB R4,[|R0,R1]..|
|000019d0| e8 11 42 49 43 20 20 52 | 34 2c 52 34 2c 52 33 0d |..BIC R|4,R4,R3.|
|000019e0| 08 f2 13 53 54 52 42 20 | 52 34 2c 5b 52 32 2c 52 |...STRB |R4,[R2,R|
|000019f0| 31 5d 0d 08 fc 14 42 47 | 54 20 63 6f 70 79 63 6c |1]....BG|T copycl|
|00001a00| 65 61 72 69 6e 67 0d 09 | 06 0e 4d 4f 56 20 50 43 |earing..|..MOV PC|
|00001a10| 2c 52 31 34 0d 09 10 05 | 3b 0d 09 1a 10 2e 63 6f |,R14....|;.....co|
|00001a20| 70 79 73 65 74 74 69 6e | 67 0d 09 24 3b 3b 20 6f |pysettin|g..$;; o|
|00001a30| 6e 20 65 6e 74 72 79 2c | 20 52 30 3d 73 6f 75 72 |n entry,| R0=sour|
|00001a40| 63 65 25 2c 20 52 31 3d | 67 72 69 64 73 69 7a 65 |ce%, R1=|gridsize|
|00001a50| 25 2c 20 52 32 3d 64 65 | 73 74 25 2c 20 52 33 3d |%, R2=de|st%, R3=|
|00001a60| 6d 61 73 6b 0d 09 2e 11 | 53 55 42 53 20 52 31 2c |mask....|SUBS R1,|
|00001a70| 52 31 2c 23 31 0d 09 38 | 13 4c 44 52 42 20 52 34 |R1,#1..8|.LDRB R4|
|00001a80| 2c 5b 52 30 2c 52 31 5d | 0d 09 42 10 84 52 20 20 |,[R0,R1]|..B..R |
|00001a90| 52 34 2c 52 34 2c 52 33 | 0d 09 4c 13 53 54 52 42 |R4,R4,R3|..L.STRB|
|00001aa0| 20 52 34 2c 5b 52 32 2c | 52 31 5d 0d 09 56 13 42 | R4,[R2,|R1]..V.B|
|00001ab0| 47 54 20 63 6f 70 79 73 | 65 74 74 69 6e 67 0d 09 |GT copys|etting..|
|00001ac0| 60 0e 4d 4f 56 20 50 43 | 2c 52 31 34 0d 09 6a 05 |`.MOV PC|,R14..j.|
|00001ad0| 3b 0d 09 74 12 2e 73 68 | 6f 77 6d 69 6e 65 73 63 |;..t..sh|owminesc|
|00001ae0| 6f 70 79 0d 09 7e 32 3b | 20 6f 6e 20 65 6e 74 72 |opy..~2;| on entr|
|00001af0| 79 2c 20 52 30 3d 73 6f | 75 72 63 65 25 2c 20 52 |y, R0=so|urce%, R|
|00001b00| 31 3d 67 72 69 64 73 69 | 7a 65 25 2c 20 52 32 3d |1=gridsi|ze%, R2=|
|00001b10| 64 65 73 74 25 0d 09 88 | 11 53 55 42 53 20 52 31 |dest%...|.SUBS R1|
|00001b20| 2c 52 31 2c 23 31 0d 09 | 92 16 2e 73 68 6f 77 6d |,R1,#1..|...showm|
|00001b30| 69 6e 65 73 63 6f 70 79 | 6c 6f 6f 70 0d 09 9c 13 |inescopy|loop....|
|00001b40| 4c 44 52 42 20 52 34 2c | 5b 52 30 2c 52 31 5d 0d |LDRB R4,|[R0,R1].|
|00001b50| 09 a6 0e 54 53 54 20 20 | 52 34 2c 23 31 0d 09 b0 |...TST |R4,#1...|
|00001b60| 38 4d 4f 56 4e 45 52 34 | 2c 23 25 31 31 30 31 31 |8MOVNER4|,#%11011|
|00001b70| 20 3b 20 61 64 6a 61 63 | 65 6e 74 2c 20 63 68 61 | ; adjac|ent, cha|
|00001b80| 6e 67 65 64 2c 20 63 6c | 65 61 72 20 61 6e 64 20 |nged, cl|ear and |
|00001b90| 6d 69 6e 65 64 0d 09 ba | 13 53 54 52 42 20 52 34 |mined...|.STRB R4|
|00001ba0| 2c 5b 52 32 2c 52 31 5d | 0d 09 c4 11 53 55 42 53 |,[R2,R1]|....SUBS|
|00001bb0| 20 52 31 2c 52 31 2c 23 | 31 0d 09 ce 19 42 47 54 | R1,R1,#|1....BGT|
|00001bc0| 20 73 68 6f 77 6d 69 6e | 65 73 63 6f 70 79 6c 6f | showmin|escopylo|
|00001bd0| 6f 70 0d 09 d8 0e 4d 4f | 56 20 50 43 2c 52 31 34 |op....MO|V PC,R14|
|00001be0| 0d 09 e2 05 3b 0d 09 ec | 0a 2e 6d 65 72 67 65 0d |....;...|..merge.|
|00001bf0| 09 f6 40 3b 20 6f 6e 20 | 65 6e 74 72 79 2c 20 52 |..@; on |entry, R|
|00001c00| 30 3d 73 6f 75 72 63 65 | 31 25 2c 20 52 31 3d 67 |0=source|1%, R1=g|
|00001c10| 72 69 64 73 69 7a 65 25 | 2c 20 52 32 3d 64 65 73 |ridsize%|, R2=des|
|00001c20| 74 25 2c 20 52 33 3d 73 | 6f 75 72 63 65 32 25 0d |t%, R3=s|ource2%.|
|00001c30| 0a 00 12 53 55 42 20 20 | 20 52 31 2c 52 31 2c 23 |...SUB | R1,R1,#|
|00001c40| 31 0d 0a 0a 0e 2e 6d 65 | 72 67 65 6c 6f 6f 70 0d |1.....me|rgeloop.|
|00001c50| 0a 14 14 4c 44 52 42 20 | 20 52 34 2c 5b 52 30 2c |...LDRB | R4,[R0,|
|00001c60| 52 31 5d 0d 0a 1e 14 4c | 44 52 42 20 20 52 35 2c |R1]....L|DRB R5,|
|00001c70| 5b 52 33 2c 52 31 5d 0d | 0a 28 11 84 52 20 20 20 |[R3,R1].|.(..R |
|00001c80| 52 36 2c 52 34 2c 52 35 | 0d 0a 32 13 80 20 20 20 |R6,R4,R5|..2.. |
|00001c90| 52 37 2c 52 36 2c 23 25 | 31 31 30 0d 0a 3c 28 43 |R7,R6,#%|110..<(C|
|00001ca0| 4d 50 20 20 20 52 37 2c | 23 25 31 31 30 20 3b 20 |MP R7,|#%110 ; |
|00001cb0| 71 75 65 72 69 65 64 20 | 61 6e 64 20 63 6c 65 61 |queried |and clea|
|00001cc0| 72 20 3f 0d 0a 46 27 42 | 49 43 45 51 20 52 36 2c |r ?..F'B|ICEQ R6,|
|00001cd0| 52 36 2c 23 25 31 30 30 | 20 3b 20 6d 61 6b 65 20 |R6,#%100| ; make |
|00001ce0| 6a 75 73 74 20 63 6c 65 | 61 72 0d 0a 50 0f 43 4d |just cle|ar..P.CM|
|00001cf0| 50 20 20 20 52 34 2c 52 | 36 0d 0a 5a 0f 43 4d 50 |P R4,R|6..Z.CMP|
|00001d00| 45 51 20 52 35 2c 52 36 | 0d 0a 64 27 84 52 4e 45 |EQ R5,R6|..d'.RNE|
|00001d10| 20 52 36 2c 52 36 2c 23 | 25 31 30 30 30 20 3b 20 | R6,R6,#|%1000 ; |
|00001d20| 63 68 61 6e 67 65 64 20 | 62 69 74 20 73 65 74 0d |changed |bit set.|
|00001d30| 0a 6e 14 53 54 52 42 20 | 20 52 36 2c 5b 52 32 2c |.n.STRB | R6,[R2,|
|00001d40| 52 31 5d 0d 0a 78 12 53 | 55 42 53 20 20 52 31 2c |R1]..x.S|UBS R1,|
|00001d50| 52 31 2c 23 31 0d 0a 82 | 13 42 47 45 20 20 20 6d |R1,#1...|.BGE m|
|00001d60| 65 72 67 65 6c 6f 6f 70 | 0d 0a 8c 10 4d 4f 56 20 |ergeloop|....MOV |
|00001d70| 20 20 50 43 2c 52 31 34 | 0d 0a 96 05 3b 0d 0a a0 | PC,R14|....;...|
|00001d80| 10 2e 73 65 74 62 6f 75 | 6e 64 61 72 79 0d 0a aa |..setbou|ndary...|
|00001d90| 37 3b 20 6f 6e 20 65 6e | 74 72 79 20 52 30 3d 62 |7; on en|try R0=b|
|00001da0| 61 73 65 25 2c 20 52 31 | 3d 78 73 69 7a 65 25 2c |ase%, R1|=xsize%,|
|00001db0| 20 52 32 3d 79 73 69 7a | 65 25 2c 20 52 33 3d 76 | R2=ysiz|e%, R3=v|
|00001dc0| 61 6c 75 65 0d 0a b4 12 | 41 44 44 20 20 20 52 34 |alue....|ADD R4|
|00001dd0| 2c 52 31 2c 23 32 0d 0a | be 0f 4d 4f 56 20 20 20 |,R1,#2..|..MOV |
|00001de0| 52 37 2c 52 34 0d 0a c8 | 15 4d 4c 41 20 20 20 52 |R7,R4...|.MLA R|
|00001df0| 35 2c 52 34 2c 52 32 2c | 52 30 0d 0a d2 12 41 44 |5,R4,R2,|R0....AD|
|00001e00| 44 20 20 20 52 35 2c 52 | 35 2c 52 34 0d 0a dc 0f |D R5,R|5,R4....|
|00001e10| 4d 4f 56 20 20 20 52 36 | 2c 52 30 0d 0a e6 16 2e |MOV R6|,R0.....|
|00001e20| 73 65 74 62 6f 75 6e 64 | 61 72 79 5f 78 6c 6f 6f |setbound|ary_xloo|
|00001e30| 70 0d 0a f0 14 53 54 52 | 42 20 20 52 33 2c 5b 52 |p....STR|B R3,[R|
|00001e40| 35 5d 2c 23 31 0d 0a fa | 14 53 54 52 42 20 20 52 |5],#1...|.STRB R|
|00001e50| 33 2c 5b 52 36 5d 2c 23 | 31 0d 0b 04 12 53 55 42 |3,[R6],#|1....SUB|
|00001e60| 53 20 20 52 37 2c 52 37 | 2c 23 31 0d 0b 0e 19 42 |S R7,R7|,#1....B|
|00001e70| 47 54 20 73 65 74 62 6f | 75 6e 64 61 72 79 5f 78 |GT setbo|undary_x|
|00001e80| 6c 6f 6f 70 0d 0b 18 2c | 3b 52 36 20 69 73 20 6e |loop...,|;R6 is n|
|00001e90| 6f 77 20 70 6f 69 6e 74 | 65 72 20 74 6f 20 73 74 |ow point|er to st|
|00001ea0| 61 72 74 20 6f 66 20 6f | 66 20 6c 69 6e 65 20 31 |art of o|f line 1|
|00001eb0| 0d 0b 22 12 41 44 44 20 | 20 20 52 35 2c 52 36 2c |..".ADD | R5,R6,|
|00001ec0| 52 31 0d 0b 2c 12 41 44 | 44 20 20 20 52 35 2c 52 |R1..,.AD|D R5,R|
|00001ed0| 35 2c 23 31 0d 0b 36 0f | 4d 4f 56 20 20 20 52 37 |5,#1..6.|MOV R7|
|00001ee0| 2c 52 32 0d 0b 40 16 2e | 73 65 74 62 6f 75 6e 64 |,R2..@..|setbound|
|00001ef0| 61 72 79 5f 79 6c 6f 6f | 70 0d 0b 4a 14 53 54 52 |ary_yloo|p..J.STR|
|00001f00| 42 20 20 52 33 2c 5b 52 | 35 5d 2c 52 34 0d 0b 54 |B R3,[R|5],R4..T|
|00001f10| 14 53 54 52 42 20 20 52 | 33 2c 5b 52 36 5d 2c 52 |.STRB R|3,[R6],R|
|00001f20| 34 0d 0b 5e 12 53 55 42 | 53 20 20 52 37 2c 52 37 |4..^.SUB|S R7,R7|
|00001f30| 2c 23 31 0d 0b 68 19 42 | 47 54 20 73 65 74 62 6f |,#1..h.B|GT setbo|
|00001f40| 75 6e 64 61 72 79 5f 79 | 6c 6f 6f 70 0d 0b 72 10 |undary_y|loop..r.|
|00001f50| 4d 4f 56 20 20 20 50 43 | 2c 52 31 34 0d 0b 7c 05 |MOV PC|,R14..|.|
|00001f60| 3b 0d 0b 86 0a 2e 63 6c | 65 61 72 0d 0b 90 2e 3b |;.....cl|ear....;|
|00001f70| 20 6f 6e 20 65 6e 74 72 | 79 2c 20 52 30 3d 62 61 | on entr|y, R0=ba|
|00001f80| 73 65 25 2c 20 52 31 3d | 78 73 69 7a 65 25 2c 20 |se%, R1=|xsize%, |
|00001f90| 52 32 3d 79 73 69 7a 65 | 25 0d 0b 9a 1c 4d 4f 56 |R2=ysize|%....MOV|
|00001fa0| 20 20 20 52 31 31 2c 23 | 30 20 3b 20 64 6f 6e 65 | R11,#|0 ; done|
|00001fb0| 20 66 6c 61 67 0d 0b a4 | 21 4d 4f 56 20 20 20 52 | flag...|!MOV R|
|00001fc0| 33 2c 52 32 20 20 3b 20 | 79 20 6c 69 6e 65 20 63 |3,R2 ; |y line c|
|00001fd0| 6f 75 6e 74 65 72 0d 0b | ae 23 41 44 44 20 20 20 |ounter..|.#ADD |
|00001fe0| 52 34 2c 52 31 2c 23 32 | 20 3b 20 62 79 74 65 73 |R4,R1,#2| ; bytes|
|00001ff0| 20 70 65 72 20 6c 69 6e | 65 0d 0b b8 28 41 44 44 | per lin|e...(ADD|
|00002000| 20 20 20 52 35 2c 52 30 | 2c 52 34 20 3b 20 73 74 | R5,R0|,R4 ; st|
|00002010| 61 72 74 20 6f 66 20 66 | 69 72 73 74 20 6c 69 6e |art of f|irst lin|
|00002020| 65 0d 0b c2 11 2e 63 6c | 65 61 72 5f 79 6c 6f 6f |e.....cl|ear_yloo|
|00002030| 70 31 0d 0b cc 25 4d 4f | 56 20 20 20 52 36 2c 52 |p1...%MO|V R6,R|
|00002040| 31 20 20 20 20 3b 20 78 | 20 63 6f 6c 75 6d 6e 20 |1 ; x| column |
|00002050| 63 6f 75 6e 74 65 72 0d | 0b d6 11 2e 63 6c 65 61 |counter.|....clea|
|00002060| 72 5f 78 6c 6f 6f 70 31 | 0d 0b e0 2c 41 44 44 20 |r_xloop1|...,ADD |
|00002070| 20 20 52 35 2c 52 35 2c | 23 31 20 3b 20 61 64 64 | R5,R5,|#1 ; add|
|00002080| 72 65 73 73 20 6f 66 20 | 63 75 72 72 65 6e 74 20 |ress of |current |
|00002090| 63 65 6c 6c 0d 0b ea 21 | 4c 44 52 42 20 20 52 38 |cell...!|LDRB R8|
|000020a0| 2c 5b 52 35 5d 20 20 3b | 20 63 75 72 72 65 6e 74 |,[R5] ;| current|
|000020b0| 20 63 65 6c 6c 0d 0b f4 | 23 54 53 54 20 20 20 52 | cell...|#TST R|
|000020c0| 38 2c 23 25 31 30 20 20 | 3b 20 63 6c 65 61 72 20 |8,#%10 |; clear |
|000020d0| 61 6c 72 65 61 64 79 3f | 0d 0b fe 1d 42 4e 45 20 |already?|....BNE |
|000020e0| 20 20 63 6c 65 61 72 5f | 73 6b 69 70 74 68 69 73 | clear_|skipthis|
|000020f0| 63 65 6c 6c 31 0d 0c 08 | 25 4c 44 52 42 20 20 52 |cell1...|%LDRB R|
|00002100| 37 2c 5b 52 35 2c 23 2d | 31 5d 20 3b 20 63 65 6c |7,[R5,#-|1] ; cel|
|00002110| 6c 20 6f 6e 65 20 6c 65 | 66 74 0d 0c 12 1e 54 53 |l one le|ft....TS|
|00002120| 54 20 20 20 52 37 2c 23 | 25 31 30 20 20 20 20 20 |T R7,#|%10 |
|00002130| 3b 20 63 6c 65 61 72 3f | 0d 0c 1c 27 80 4e 45 20 |; clear?|...'.NE |
|00002140| 52 39 2c 52 37 2c 23 25 | 31 30 30 30 30 20 3b 20 |R9,R7,#%|10000 ; |
|00002150| 6e 65 78 74 20 74 6f 20 | 61 20 6d 69 6e 65 3f 0d |next to |a mine?.|
|00002160| 0c 26 36 54 45 51 4e 45 | 20 52 39 2c 23 25 31 30 |.&6TEQNE| R9,#%10|
|00002170| 30 30 30 20 20 3b 20 30 | 20 69 66 20 6e 65 78 74 |000 ; 0| if next|
|00002180| 20 74 6f 20 6d 69 6e 65 | 2c 20 65 6c 73 65 20 25 | to mine|, else %|
|00002190| 31 30 30 30 30 0d 0c 30 | 1a 42 4e 45 20 20 20 63 |10000..0|.BNE c|
|000021a0| 6c 65 61 72 5f 63 6c 65 | 61 72 63 65 6c 6c 31 0d |lear_cle|arcell1.|
|000021b0| 0c 3a 26 4c 44 52 42 20 | 20 52 37 2c 5b 52 35 2c |.:&LDRB | R7,[R5,|
|000021c0| 23 31 5d 20 20 3b 20 63 | 65 6c 6c 20 6f 6e 65 20 |#1] ; c|ell one |
|000021d0| 72 69 67 68 74 0d 0c 44 | 1e 54 53 54 20 20 20 52 |right..D|.TST R|
|000021e0| 37 2c 23 25 31 30 20 20 | 20 20 20 3b 20 63 6c 65 |7,#%10 | ; cle|
|000021f0| 61 72 3f 0d 0c 4e 27 80 | 4e 45 20 52 39 2c 52 37 |ar?..N'.|NE R9,R7|
|00002200| 2c 23 25 31 30 30 30 30 | 20 3b 20 6e 65 78 74 20 |,#%10000| ; next |
|00002210| 74 6f 20 61 20 6d 69 6e | 65 3f 0d 0c 58 36 54 45 |to a min|e?..X6TE|
|00002220| 51 4e 45 20 52 39 2c 23 | 25 31 30 30 30 30 20 20 |QNE R9,#|%10000 |
|00002230| 3b 20 30 20 69 66 20 6e | 65 78 74 20 74 6f 20 6d |; 0 if n|ext to m|
|00002240| 69 6e 65 2c 20 65 6c 73 | 65 20 25 31 30 30 30 30 |ine, els|e %10000|
|00002250| 0d 0c 62 1a 42 4e 45 20 | 20 20 63 6c 65 61 72 5f |..b.BNE | clear_|
|00002260| 63 6c 65 61 72 63 65 6c | 6c 31 0d 0c 6c 21 53 55 |clearcel|l1..l!SU|
|00002270| 42 20 20 20 52 31 30 2c | 52 35 2c 52 34 20 20 20 |B R10,|R5,R4 |
|00002280| 3b 20 72 6f 77 20 61 62 | 6f 76 65 0d 0c 76 22 4c |; row ab|ove..v"L|
|00002290| 44 52 42 20 20 52 37 2c | 5b 52 31 30 5d 20 20 20 |DRB R7,|[R10] |
|000022a0| 20 3b 20 63 65 6c 6c 20 | 61 62 6f 76 65 0d 0c 80 | ; cell |above...|
|000022b0| 1e 54 53 54 20 20 20 52 | 37 2c 23 25 31 30 20 20 |.TST R|7,#%10 |
|000022c0| 20 20 20 3b 20 63 6c 65 | 61 72 3f 0d 0c 8a 27 80 | ; cle|ar?...'.|
|000022d0| 4e 45 20 52 39 2c 52 37 | 2c 23 25 31 30 30 30 30 |NE R9,R7|,#%10000|
|000022e0| 20 3b 20 6e 65 78 74 20 | 74 6f 20 61 20 6d 69 6e | ; next |to a min|
|000022f0| 65 3f 0d 0c 94 36 54 45 | 51 4e 45 20 52 39 2c 23 |e?...6TE|QNE R9,#|
|00002300| 25 31 30 30 30 30 20 20 | 3b 20 30 20 69 66 20 6e |%10000 |; 0 if n|
|00002310| 65 78 74 20 74 6f 20 6d | 69 6e 65 2c 20 65 6c 73 |ext to m|ine, els|
|00002320| 65 20 25 31 30 30 30 30 | 0d 0c 9e 1a 42 4e 45 20 |e %10000|....BNE |
|00002330| 20 20 63 6c 65 61 72 5f | 63 6c 65 61 72 63 65 6c | clear_|clearcel|
|00002340| 6c 31 0d 0c a8 32 4c 44 | 52 42 20 20 52 37 2c 5b |l1...2LD|RB R7,[|
|00002350| 52 31 30 2c 23 2d 31 5d | 20 3b 20 63 65 6c 6c 20 |R10,#-1]| ; cell |
|00002360| 6f 6e 65 20 6c 65 66 74 | 20 28 61 6e 64 20 61 62 |one left| (and ab|
|00002370| 6f 76 65 29 0d 0c b2 1e | 54 53 54 20 20 20 52 37 |ove)....|TST R7|
|00002380| 2c 23 25 31 30 20 20 20 | 20 20 3b 20 63 6c 65 61 |,#%10 | ; clea|
|00002390| 72 3f 0d 0c bc 27 80 4e | 45 20 52 39 2c 52 37 2c |r?...'.N|E R9,R7,|
|000023a0| 23 25 31 30 30 30 30 20 | 3b 20 6e 65 78 74 20 74 |#%10000 |; next t|
|000023b0| 6f 20 61 20 6d 69 6e 65 | 3f 0d 0c c6 36 54 45 51 |o a mine|?...6TEQ|
|000023c0| 4e 45 20 52 39 2c 23 25 | 31 30 30 30 30 20 20 3b |NE R9,#%|10000 ;|
|000023d0| 20 30 20 69 66 20 6e 65 | 78 74 20 74 6f 20 6d 69 | 0 if ne|xt to mi|
|000023e0| 6e 65 2c 20 65 6c 73 65 | 20 25 31 30 30 30 30 0d |ne, else| %10000.|
|000023f0| 0c d0 1a 42 4e 45 20 20 | 20 63 6c 65 61 72 5f 63 |...BNE | clear_c|
|00002400| 6c 65 61 72 63 65 6c 6c | 31 0d 0c da 32 4c 44 52 |learcell|1...2LDR|
|00002410| 42 20 20 52 37 2c 5b 52 | 31 30 2c 23 31 5d 20 3b |B R7,[R|10,#1] ;|
|00002420| 20 63 65 6c 6c 20 6f 6e | 65 20 72 69 67 68 74 20 | cell on|e right |
|00002430| 28 61 6e 64 20 61 62 6f | 76 65 29 0d 0c e4 1e 54 |(and abo|ve)....T|
|00002440| 53 54 20 20 20 52 37 2c | 23 25 31 30 20 20 20 20 |ST R7,|#%10 |
|00002450| 20 3b 20 63 6c 65 61 72 | 3f 0d 0c ee 27 80 4e 45 | ; clear|?...'.NE|
|00002460| 20 52 39 2c 52 37 2c 23 | 25 31 30 30 30 30 20 3b | R9,R7,#|%10000 ;|
|00002470| 20 6e 65 78 74 20 74 6f | 20 61 20 6d 69 6e 65 3f | next to| a mine?|
|00002480| 0d 0c f8 36 54 45 51 4e | 45 20 52 39 2c 23 25 31 |...6TEQN|E R9,#%1|
|00002490| 30 30 30 30 20 20 3b 20 | 30 20 69 66 20 6e 65 78 |0000 ; |0 if nex|
|000024a0| 74 20 74 6f 20 6d 69 6e | 65 2c 20 65 6c 73 65 20 |t to min|e, else |
|000024b0| 25 31 30 30 30 30 0d 0d | 02 1a 42 4e 45 20 20 20 |%10000..|..BNE |
|000024c0| 63 6c 65 61 72 5f 63 6c | 65 61 72 63 65 6c 6c 31 |clear_cl|earcell1|
|000024d0| 0d 0d 0c 21 41 44 44 20 | 20 20 52 31 30 2c 52 35 |...!ADD | R10,R5|
|000024e0| 2c 52 34 20 20 20 3b 20 | 72 6f 77 20 62 65 6c 6f |,R4 ; |row belo|
|000024f0| 77 0d 0d 16 22 4c 44 52 | 42 20 20 52 37 2c 5b 52 |w..."LDR|B R7,[R|
|00002500| 31 30 5d 20 20 20 20 3b | 20 63 65 6c 6c 20 62 65 |10] ;| cell be|
|00002510| 6c 6f 77 0d 0d 20 1e 54 | 53 54 20 20 20 52 37 2c |low.. .T|ST R7,|
|00002520| 23 25 31 30 20 20 20 20 | 20 3b 20 63 6c 65 61 72 |#%10 | ; clear|
|00002530| 3f 0d 0d 2a 27 80 4e 45 | 20 52 39 2c 52 37 2c 23 |?..*'.NE| R9,R7,#|
|00002540| 25 31 30 30 30 30 20 3b | 20 6e 65 78 74 20 74 6f |%10000 ;| next to|
|00002550| 20 61 20 6d 69 6e 65 3f | 0d 0d 34 36 54 45 51 4e | a mine?|..46TEQN|
|00002560| 45 20 52 39 2c 23 25 31 | 30 30 30 30 20 20 3b 20 |E R9,#%1|0000 ; |
|00002570| 30 20 69 66 20 6e 65 78 | 74 20 74 6f 20 6d 69 6e |0 if nex|t to min|
|00002580| 65 2c 20 65 6c 73 65 20 | 25 31 30 30 30 30 0d 0d |e, else |%10000..|
|00002590| 3e 1a 42 4e 45 20 20 20 | 63 6c 65 61 72 5f 63 6c |>.BNE |clear_cl|
|000025a0| 65 61 72 63 65 6c 6c 31 | 0d 0d 48 32 4c 44 52 42 |earcell1|..H2LDRB|
|000025b0| 20 20 52 37 2c 5b 52 31 | 30 2c 23 2d 31 5d 20 3b | R7,[R1|0,#-1] ;|
|000025c0| 20 63 65 6c 6c 20 6f 6e | 65 20 6c 65 66 74 20 28 | cell on|e left (|
|000025d0| 61 6e 64 20 62 65 6c 6f | 77 29 0d 0d 52 1e 54 53 |and belo|w)..R.TS|
|000025e0| 54 20 20 20 52 37 2c 23 | 25 31 30 20 20 20 20 20 |T R7,#|%10 |
|000025f0| 3b 20 63 6c 65 61 72 3f | 0d 0d 5c 27 80 4e 45 20 |; clear?|..\'.NE |
|00002600| 52 39 2c 52 37 2c 23 25 | 31 30 30 30 30 20 3b 20 |R9,R7,#%|10000 ; |
|00002610| 6e 65 78 74 20 74 6f 20 | 61 20 6d 69 6e 65 3f 0d |next to |a mine?.|
|00002620| 0d 66 36 54 45 51 4e 45 | 20 52 39 2c 23 25 31 30 |.f6TEQNE| R9,#%10|
|00002630| 30 30 30 20 20 3b 20 30 | 20 69 66 20 6e 65 78 74 |000 ; 0| if next|
|00002640| 20 74 6f 20 6d 69 6e 65 | 2c 20 65 6c 73 65 20 25 | to mine|, else %|
|00002650| 31 30 30 30 30 0d 0d 70 | 1a 42 4e 45 20 20 20 63 |10000..p|.BNE c|
|00002660| 6c 65 61 72 5f 63 6c 65 | 61 72 63 65 6c 6c 31 0d |lear_cle|arcell1.|
|00002670| 0d 7a 32 4c 44 52 42 20 | 20 52 37 2c 5b 52 31 30 |.z2LDRB | R7,[R10|
|00002680| 2c 23 31 5d 20 3b 20 63 | 65 6c 6c 20 6f 6e 65 20 |,#1] ; c|ell one |
|00002690| 72 69 67 68 74 20 28 61 | 6e 64 20 62 65 6c 6f 77 |right (a|nd below|
|000026a0| 29 0d 0d 84 1e 54 53 54 | 20 20 20 52 37 2c 23 25 |)....TST| R7,#%|
|000026b0| 31 30 20 20 20 20 20 3b | 20 63 6c 65 61 72 3f 0d |10 ;| clear?.|
|000026c0| 0d 8e 27 80 4e 45 20 52 | 39 2c 52 37 2c 23 25 31 |..'.NE R|9,R7,#%1|
|000026d0| 30 30 30 30 20 3b 20 6e | 65 78 74 20 74 6f 20 61 |0000 ; n|ext to a|
|000026e0| 20 6d 69 6e 65 3f 0d 0d | 98 36 54 45 51 4e 45 20 | mine?..|.6TEQNE |
|000026f0| 52 39 2c 23 25 31 30 30 | 30 30 20 20 3b 20 30 20 |R9,#%100|00 ; 0 |
|00002700| 69 66 20 6e 65 78 74 20 | 74 6f 20 6d 69 6e 65 2c |if next |to mine,|
|00002710| 20 65 6c 73 65 20 25 31 | 30 30 30 30 0d 0d a2 1a | else %1|0000....|
|00002720| 42 4e 45 20 20 20 63 6c | 65 61 72 5f 63 6c 65 61 |BNE cl|ear_clea|
|00002730| 72 63 65 6c 6c 31 0d 0d | ac 1d 42 20 20 20 20 20 |rcell1..|..B |
|00002740| 63 6c 65 61 72 5f 73 6b | 69 70 74 68 69 73 63 65 |clear_sk|ipthisce|
|00002750| 6c 6c 31 0d 0d b6 15 2e | 63 6c 65 61 72 5f 63 6c |ll1.....|clear_cl|
|00002760| 65 61 72 63 65 6c 6c 31 | 0d 0d c0 2b 84 52 20 20 |earcell1|...+.R |
|00002770| 20 52 38 2c 52 38 2c 23 | 25 30 31 30 31 30 20 20 | R8,R8,#|%01010 |
|00002780| 3b 20 63 6c 65 61 72 20 | 61 6e 64 20 63 68 61 6e |; clear |and chan|
|00002790| 67 65 64 0d 0d ca 11 53 | 54 52 42 20 20 52 38 2c |ged....S|TRB R8,|
|000027a0| 5b 52 35 5d 0d 0d d4 10 | 4d 4f 56 20 20 20 52 31 |[R5]....|MOV R1|
|000027b0| 31 2c 23 31 0d 0d de 18 | 2e 63 6c 65 61 72 5f 73 |1,#1....|.clear_s|
|000027c0| 6b 69 70 74 68 69 73 63 | 65 6c 6c 31 0d 0d e8 12 |kipthisc|ell1....|
|000027d0| 53 55 42 53 20 20 52 36 | 2c 52 36 2c 23 31 0d 0d |SUBS R6|,R6,#1..|
|000027e0| f2 16 42 47 54 20 20 20 | 63 6c 65 61 72 5f 78 6c |..BGT |clear_xl|
|000027f0| 6f 6f 70 31 0d 0d fc 29 | 41 44 44 20 20 20 52 35 |oop1...)|ADD R5|
|00002800| 2c 52 35 2c 23 32 20 20 | 20 20 3b 20 6e 65 78 74 |,R5,#2 | ; next|
|00002810| 20 6c 69 6e 65 20 61 64 | 64 72 65 73 73 0d 0e 06 | line ad|dress...|
|00002820| 12 53 55 42 53 20 20 52 | 33 2c 52 33 2c 23 31 0d |.SUBS R|3,R3,#1.|
|00002830| 0e 10 16 42 47 54 20 20 | 20 63 6c 65 61 72 5f 79 |...BGT | clear_y|
|00002840| 6c 6f 6f 70 31 0d 0e 1a | 1d 43 4d 50 20 20 20 52 |loop1...|.CMP R|
|00002850| 31 31 2c 23 30 20 20 20 | 20 20 20 3b 20 64 6f 6e |11,#0 | ; don|
|00002860| 65 3f 0d 0e 24 19 ec 51 | 20 50 43 2c 52 31 34 20 |e?..$..Q| PC,R14 |
|00002870| 20 20 20 20 20 3b 20 65 | 78 69 74 0d 0e 2e 0f 2e | ; e|xit.....|
|00002880| 63 6c 65 61 72 70 61 73 | 73 32 0d 0e 38 36 3b 20 |clearpas|s2..86; |
|00002890| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000028a0| 20 20 20 20 20 20 20 20 | 20 73 65 63 6f 6e 64 20 | | second |
|000028b0| 70 61 73 73 20 2d 20 6f | 74 68 65 72 20 77 61 79 |pass - o|ther way|
|000028c0| 0d 0e 42 1c 4d 4f 56 20 | 20 20 52 31 31 2c 23 30 |..B.MOV | R11,#0|
|000028d0| 20 3b 20 64 6f 6e 65 20 | 66 6c 61 67 0d 0e 4c 21 | ; done |flag..L!|
|000028e0| 4d 4f 56 20 20 20 52 33 | 2c 52 32 20 20 3b 20 79 |MOV R3|,R2 ; y|
|000028f0| 20 6c 69 6e 65 20 63 6f | 75 6e 74 65 72 0d 0e 56 | line co|unter..V|
|00002900| 23 41 44 44 20 20 20 52 | 34 2c 52 31 2c 23 32 20 |#ADD R|4,R1,#2 |
|00002910| 3b 20 62 79 74 65 73 20 | 70 65 72 20 6c 69 6e 65 |; bytes |per line|
|00002920| 0d 0e 60 35 4d 4c 41 20 | 20 20 52 35 2c 52 34 2c |..`5MLA | R5,R4,|
|00002930| 52 32 2c 52 30 20 3b 20 | 6c 69 6e 65 73 69 7a 65 |R2,R0 ; |linesize|
|00002940| 20 78 20 6e 6f 2e 6f 66 | 20 6c 69 6e 65 73 20 2b | x no.of| lines +|
|00002950| 20 62 61 73 65 0d 0e 6a | 12 53 55 42 20 20 20 52 | base..j|.SUB R|
|00002960| 35 2c 52 35 2c 23 32 0d | 0e 74 12 41 44 44 20 20 |5,R5,#2.|.t.ADD |
|00002970| 20 52 35 2c 52 35 2c 52 | 34 0d 0e 7e 11 2e 63 6c | R5,R5,R|4..~..cl|
|00002980| 65 61 72 5f 79 6c 6f 6f | 70 32 0d 0e 88 25 4d 4f |ear_yloo|p2...%MO|
|00002990| 56 20 20 20 52 36 2c 52 | 31 20 20 20 20 3b 20 78 |V R6,R|1 ; x|
|000029a0| 20 63 6f 6c 75 6d 6e 20 | 63 6f 75 6e 74 65 72 0d | column |counter.|
|000029b0| 0e 92 2d 3b 41 44 44 20 | 20 20 52 35 2c 52 35 2c |..-;ADD | R5,R5,|
|000029c0| 52 31 20 3b 20 61 64 64 | 72 65 73 73 20 6f 66 20 |R1 ; add|ress of |
|000029d0| 63 75 72 72 65 6e 74 20 | 63 65 6c 6c 0d 0e 9c 11 |current |cell....|
|000029e0| 2e 63 6c 65 61 72 5f 78 | 6c 6f 6f 70 32 0d 0e a6 |.clear_x|loop2...|
|000029f0| 21 4c 44 52 42 20 20 52 | 38 2c 5b 52 35 5d 20 20 |!LDRB R|8,[R5] |
|00002a00| 3b 20 63 75 72 72 65 6e | 74 20 63 65 6c 6c 0d 0e |; curren|t cell..|
|00002a10| b0 23 54 53 54 20 20 20 | 52 38 2c 23 25 31 30 20 |.#TST |R8,#%10 |
|00002a20| 20 3b 20 63 6c 65 61 72 | 20 61 6c 72 65 61 64 79 | ; clear| already|
|00002a30| 3f 0d 0e ba 1d 42 4e 45 | 20 20 20 63 6c 65 61 72 |?....BNE| clear|
|00002a40| 5f 73 6b 69 70 74 68 69 | 73 63 65 6c 6c 32 0d 0e |_skipthi|scell2..|
|00002a50| c4 25 4c 44 52 42 20 20 | 52 37 2c 5b 52 35 2c 23 |.%LDRB |R7,[R5,#|
|00002a60| 2d 31 5d 20 3b 20 63 65 | 6c 6c 20 6f 6e 65 20 6c |-1] ; ce|ll one l|
|00002a70| 65 66 74 0d 0e ce 1e 54 | 53 54 20 20 20 52 37 2c |eft....T|ST R7,|
|00002a80| 23 25 31 30 20 20 20 20 | 20 3b 20 63 6c 65 61 72 |#%10 | ; clear|
|00002a90| 3f 0d 0e d8 15 80 4e 45 | 20 52 39 2c 52 37 2c 23 |?.....NE| R9,R7,#|
|00002aa0| 25 31 30 30 30 30 0d 0e | e2 36 54 45 51 4e 45 20 |%10000..|.6TEQNE |
|00002ab0| 52 39 2c 23 25 31 30 30 | 30 30 20 20 3b 20 30 20 |R9,#%100|00 ; 0 |
|00002ac0| 69 66 20 6e 65 78 74 20 | 74 6f 20 6d 69 6e 65 2c |if next |to mine,|
|00002ad0| 20 65 6c 73 65 20 25 31 | 30 30 30 30 0d 0e ec 1a | else %1|0000....|
|00002ae0| 42 4e 45 20 20 20 63 6c | 65 61 72 5f 63 6c 65 61 |BNE cl|ear_clea|
|00002af0| 72 63 65 6c 6c 32 0d 0e | f6 26 4c 44 52 42 20 20 |rcell2..|.&LDRB |
|00002b00| 52 37 2c 5b 52 35 2c 23 | 31 5d 20 20 3b 20 63 65 |R7,[R5,#|1] ; ce|
|00002b10| 6c 6c 20 6f 6e 65 20 72 | 69 67 68 74 0d 0f 00 1e |ll one r|ight....|
|00002b20| 54 53 54 20 20 20 52 37 | 2c 23 25 31 30 20 20 20 |TST R7|,#%10 |
|00002b30| 20 20 3b 20 63 6c 65 61 | 72 3f 0d 0f 0a 15 80 4e | ; clea|r?.....N|
|00002b40| 45 20 52 39 2c 52 37 2c | 23 25 31 30 30 30 30 0d |E R9,R7,|#%10000.|
|00002b50| 0f 14 36 54 45 51 4e 45 | 20 52 39 2c 23 25 31 30 |..6TEQNE| R9,#%10|
|00002b60| 30 30 30 20 20 3b 20 30 | 20 69 66 20 6e 65 78 74 |000 ; 0| if next|
|00002b70| 20 74 6f 20 6d 69 6e 65 | 2c 20 65 6c 73 65 20 25 | to mine|, else %|
|00002b80| 31 30 30 30 30 0d 0f 1e | 1a 42 4e 45 20 20 20 63 |10000...|.BNE c|
|00002b90| 6c 65 61 72 5f 63 6c 65 | 61 72 63 65 6c 6c 32 0d |lear_cle|arcell2.|
|00002ba0| 0f 28 21 53 55 42 20 20 | 20 52 31 30 2c 52 35 2c |.(!SUB | R10,R5,|
|00002bb0| 52 34 20 20 20 3b 20 72 | 6f 77 20 61 62 6f 76 65 |R4 ; r|ow above|
|00002bc0| 0d 0f 32 22 4c 44 52 42 | 20 20 52 37 2c 5b 52 31 |..2"LDRB| R7,[R1|
|00002bd0| 30 5d 20 20 20 20 3b 20 | 63 65 6c 6c 20 61 62 6f |0] ; |cell abo|
|00002be0| 76 65 0d 0f 3c 1e 54 53 | 54 20 20 20 52 37 2c 23 |ve..<.TS|T R7,#|
|00002bf0| 25 31 30 20 20 20 20 20 | 3b 20 63 6c 65 61 72 3f |%10 |; clear?|
|00002c00| 0d 0f 46 15 80 4e 45 20 | 52 39 2c 52 37 2c 23 25 |..F..NE |R9,R7,#%|
|00002c10| 31 30 30 30 30 0d 0f 50 | 36 54 45 51 4e 45 20 52 |10000..P|6TEQNE R|
|00002c20| 39 2c 23 25 31 30 30 30 | 30 20 20 3b 20 30 20 69 |9,#%1000|0 ; 0 i|
|00002c30| 66 20 6e 65 78 74 20 74 | 6f 20 6d 69 6e 65 2c 20 |f next t|o mine, |
|00002c40| 65 6c 73 65 20 25 31 30 | 30 30 30 0d 0f 5a 1a 42 |else %10|000..Z.B|
|00002c50| 4e 45 20 20 20 63 6c 65 | 61 72 5f 63 6c 65 61 72 |NE cle|ar_clear|
|00002c60| 63 65 6c 6c 32 0d 0f 64 | 32 4c 44 52 42 20 20 52 |cell2..d|2LDRB R|
|00002c70| 37 2c 5b 52 31 30 2c 23 | 2d 31 5d 20 3b 20 63 65 |7,[R10,#|-1] ; ce|
|00002c80| 6c 6c 20 6f 6e 65 20 6c | 65 66 74 20 28 61 6e 64 |ll one l|eft (and|
|00002c90| 20 61 62 6f 76 65 29 0d | 0f 6e 1e 54 53 54 20 20 | above).|.n.TST |
|00002ca0| 20 52 37 2c 23 25 31 30 | 20 20 20 20 20 3b 20 63 | R7,#%10| ; c|
|00002cb0| 6c 65 61 72 3f 0d 0f 78 | 15 80 4e 45 20 52 39 2c |lear?..x|..NE R9,|
|00002cc0| 52 37 2c 23 25 31 30 30 | 30 30 0d 0f 82 36 54 45 |R7,#%100|00...6TE|
|00002cd0| 51 4e 45 20 52 39 2c 23 | 25 31 30 30 30 30 20 20 |QNE R9,#|%10000 |
|00002ce0| 3b 20 30 20 69 66 20 6e | 65 78 74 20 74 6f 20 6d |; 0 if n|ext to m|
|00002cf0| 69 6e 65 2c 20 65 6c 73 | 65 20 25 31 30 30 30 30 |ine, els|e %10000|
|00002d00| 0d 0f 8c 1a 42 4e 45 20 | 20 20 63 6c 65 61 72 5f |....BNE | clear_|
|00002d10| 63 6c 65 61 72 63 65 6c | 6c 32 0d 0f 96 32 4c 44 |clearcel|l2...2LD|
|00002d20| 52 42 20 20 52 37 2c 5b | 52 31 30 2c 23 31 5d 20 |RB R7,[|R10,#1] |
|00002d30| 3b 20 63 65 6c 6c 20 6f | 6e 65 20 72 69 67 68 74 |; cell o|ne right|
|00002d40| 20 28 61 6e 64 20 61 62 | 6f 76 65 29 0d 0f a0 1e | (and ab|ove)....|
|00002d50| 54 53 54 20 20 20 52 37 | 2c 23 25 31 30 20 20 20 |TST R7|,#%10 |
|00002d60| 20 20 3b 20 63 6c 65 61 | 72 3f 0d 0f aa 15 80 4e | ; clea|r?.....N|
|00002d70| 45 20 52 39 2c 52 37 2c | 23 25 31 30 30 30 30 0d |E R9,R7,|#%10000.|
|00002d80| 0f b4 36 54 45 51 4e 45 | 20 52 39 2c 23 25 31 30 |..6TEQNE| R9,#%10|
|00002d90| 30 30 30 20 20 3b 20 30 | 20 69 66 20 6e 65 78 74 |000 ; 0| if next|
|00002da0| 20 74 6f 20 6d 69 6e 65 | 2c 20 65 6c 73 65 20 25 | to mine|, else %|
|00002db0| 31 30 30 30 30 0d 0f be | 1a 42 4e 45 20 20 20 63 |10000...|.BNE c|
|00002dc0| 6c 65 61 72 5f 63 6c 65 | 61 72 63 65 6c 6c 32 0d |lear_cle|arcell2.|
|00002dd0| 0f c8 21 41 44 44 20 20 | 20 52 31 30 2c 52 35 2c |..!ADD | R10,R5,|
|00002de0| 52 34 20 20 20 3b 20 72 | 6f 77 20 62 65 6c 6f 77 |R4 ; r|ow below|
|00002df0| 0d 0f d2 22 4c 44 52 42 | 20 20 52 37 2c 5b 52 31 |..."LDRB| R7,[R1|
|00002e00| 30 5d 20 20 20 20 3b 20 | 63 65 6c 6c 20 62 65 6c |0] ; |cell bel|
|00002e10| 6f 77 0d 0f dc 1e 54 53 | 54 20 20 20 52 37 2c 23 |ow....TS|T R7,#|
|00002e20| 25 31 30 20 20 20 20 20 | 3b 20 63 6c 65 61 72 3f |%10 |; clear?|
|00002e30| 0d 0f e6 15 80 4e 45 20 | 52 39 2c 52 37 2c 23 25 |.....NE |R9,R7,#%|
|00002e40| 31 30 30 30 30 0d 0f f0 | 36 54 45 51 4e 45 20 52 |10000...|6TEQNE R|
|00002e50| 39 2c 23 25 31 30 30 30 | 30 20 20 3b 20 30 20 69 |9,#%1000|0 ; 0 i|
|00002e60| 66 20 6e 65 78 74 20 74 | 6f 20 6d 69 6e 65 2c 20 |f next t|o mine, |
|00002e70| 65 6c 73 65 20 25 31 30 | 30 30 30 0d 0f fa 1a 42 |else %10|000....B|
|00002e80| 4e 45 20 20 20 63 6c 65 | 61 72 5f 63 6c 65 61 72 |NE cle|ar_clear|
|00002e90| 63 65 6c 6c 32 0d 10 04 | 32 4c 44 52 42 20 20 52 |cell2...|2LDRB R|
|00002ea0| 37 2c 5b 52 31 30 2c 23 | 2d 31 5d 20 3b 20 63 65 |7,[R10,#|-1] ; ce|
|00002eb0| 6c 6c 20 6f 6e 65 20 6c | 65 66 74 20 28 61 6e 64 |ll one l|eft (and|
|00002ec0| 20 62 65 6c 6f 77 29 0d | 10 0e 1e 54 53 54 20 20 | below).|...TST |
|00002ed0| 20 52 37 2c 23 25 31 30 | 20 20 20 20 20 3b 20 63 | R7,#%10| ; c|
|00002ee0| 6c 65 61 72 3f 0d 10 18 | 15 80 4e 45 20 52 39 2c |lear?...|..NE R9,|
|00002ef0| 52 37 2c 23 25 31 30 30 | 30 30 0d 10 22 36 54 45 |R7,#%100|00.."6TE|
|00002f00| 51 4e 45 20 52 39 2c 23 | 25 31 30 30 30 30 20 20 |QNE R9,#|%10000 |
|00002f10| 3b 20 30 20 69 66 20 6e | 65 78 74 20 74 6f 20 6d |; 0 if n|ext to m|
|00002f20| 69 6e 65 2c 20 65 6c 73 | 65 20 25 31 30 30 30 30 |ine, els|e %10000|
|00002f30| 0d 10 2c 1a 42 4e 45 20 | 20 20 63 6c 65 61 72 5f |..,.BNE | clear_|
|00002f40| 63 6c 65 61 72 63 65 6c | 6c 32 0d 10 36 32 4c 44 |clearcel|l2..62LD|
|00002f50| 52 42 20 20 52 37 2c 5b | 52 31 30 2c 23 31 5d 20 |RB R7,[|R10,#1] |
|00002f60| 3b 20 63 65 6c 6c 20 6f | 6e 65 20 72 69 67 68 74 |; cell o|ne right|
|00002f70| 20 28 61 6e 64 20 62 65 | 6c 6f 77 29 0d 10 40 1e | (and be|low)..@.|
|00002f80| 54 53 54 20 20 20 52 37 | 2c 23 25 31 30 20 20 20 |TST R7|,#%10 |
|00002f90| 20 20 3b 20 63 6c 65 61 | 72 3f 0d 10 4a 15 80 4e | ; clea|r?..J..N|
|00002fa0| 45 20 52 39 2c 52 37 2c | 23 25 31 30 30 30 30 0d |E R9,R7,|#%10000.|
|00002fb0| 10 54 36 54 45 51 4e 45 | 20 52 39 2c 23 25 31 30 |.T6TEQNE| R9,#%10|
|00002fc0| 30 30 30 20 20 3b 20 30 | 20 69 66 20 6e 65 78 74 |000 ; 0| if next|
|00002fd0| 20 74 6f 20 6d 69 6e 65 | 2c 20 65 6c 73 65 20 25 | to mine|, else %|
|00002fe0| 31 30 30 30 30 0d 10 5e | 1a 42 4e 45 20 20 20 63 |10000..^|.BNE c|
|00002ff0| 6c 65 61 72 5f 63 6c 65 | 61 72 63 65 6c 6c 32 0d |lear_cle|arcell2.|
|00003000| 10 68 1d 42 20 20 20 20 | 20 63 6c 65 61 72 5f 73 |.h.B | clear_s|
|00003010| 6b 69 70 74 68 69 73 63 | 65 6c 6c 32 0d 10 72 15 |kipthisc|ell2..r.|
|00003020| 2e 63 6c 65 61 72 5f 63 | 6c 65 61 72 63 65 6c 6c |.clear_c|learcell|
|00003030| 32 0d 10 7c 2b 84 52 20 | 20 20 52 38 2c 52 38 2c |2..|+.R | R8,R8,|
|00003040| 23 25 30 31 30 31 30 20 | 20 3b 20 63 6c 65 61 72 |#%01010 | ; clear|
|00003050| 20 61 6e 64 20 63 68 61 | 6e 67 65 64 0d 10 86 11 | and cha|nged....|
|00003060| 53 54 52 42 20 20 52 38 | 2c 5b 52 35 5d 0d 10 90 |STRB R8|,[R5]...|
|00003070| 10 4d 4f 56 20 20 20 52 | 31 31 2c 23 31 0d 10 9a |.MOV R|11,#1...|
|00003080| 18 2e 63 6c 65 61 72 5f | 73 6b 69 70 74 68 69 73 |..clear_|skipthis|
|00003090| 63 65 6c 6c 32 0d 10 a4 | 12 53 55 42 20 20 20 52 |cell2...|.SUB R|
|000030a0| 35 2c 52 35 2c 23 31 0d | 10 ae 12 53 55 42 53 20 |5,R5,#1.|...SUBS |
|000030b0| 20 52 36 2c 52 36 2c 23 | 31 0d 10 b8 16 42 47 54 | R6,R6,#|1....BGT|
|000030c0| 20 20 20 63 6c 65 61 72 | 5f 78 6c 6f 6f 70 32 0d | clear|_xloop2.|
|000030d0| 10 c2 29 53 55 42 20 20 | 20 52 35 2c 52 35 2c 23 |..)SUB | R5,R5,#|
|000030e0| 32 20 20 20 20 3b 20 6e | 65 78 74 20 6c 69 6e 65 |2 ; n|ext line|
|000030f0| 20 61 64 64 72 65 73 73 | 0d 10 cc 12 53 55 42 53 | address|....SUBS|
|00003100| 20 20 52 33 2c 52 33 2c | 23 31 0d 10 d6 16 42 47 | R3,R3,|#1....BG|
|00003110| 54 20 20 20 63 6c 65 61 | 72 5f 79 6c 6f 6f 70 32 |T clea|r_yloop2|
|00003120| 0d 10 e0 1d 43 4d 50 20 | 20 20 52 31 31 2c 23 30 |....CMP | R11,#0|
|00003130| 20 20 20 20 20 20 3b 20 | 64 6f 6e 65 3f 0d 10 ea | ; |done?...|
|00003140| 19 ec 51 20 50 43 2c 52 | 31 34 20 20 20 20 20 20 |..Q PC,R|14 |
|00003150| 3b 20 65 78 69 74 0d 10 | f4 21 42 20 20 20 20 20 |; exit..|.!B |
|00003160| 63 6c 65 61 72 20 20 20 | 20 20 20 20 3b 20 74 72 |clear | ; tr|
|00003170| 79 20 61 67 61 69 6e 0d | 10 fe 05 3b 0d 11 08 12 |y again.|...;....|
|00003180| 2e 6d 69 6e 65 61 64 6a | 61 63 65 6e 63 79 0d 11 |.mineadj|acency..|
|00003190| 12 2e 3b 20 6f 6e 20 65 | 6e 74 72 79 2c 20 52 30 |..; on e|ntry, R0|
|000031a0| 3d 62 61 73 65 25 2c 20 | 52 31 3d 78 73 69 7a 65 |=base%, |R1=xsize|
|000031b0| 25 2c 20 52 32 3d 79 73 | 69 7a 65 25 0d 11 1c 21 |%, R2=ys|ize%...!|
|000031c0| 4d 4f 56 20 20 20 52 33 | 2c 52 32 20 20 3b 20 79 |MOV R3|,R2 ; y|
|000031d0| 20 6c 69 6e 65 20 63 6f | 75 6e 74 65 72 0d 11 26 | line co|unter..&|
|000031e0| 23 41 44 44 20 20 20 52 | 34 2c 52 31 2c 23 32 20 |#ADD R|4,R1,#2 |
|000031f0| 3b 20 62 79 74 65 73 20 | 70 65 72 20 6c 69 6e 65 |; bytes |per line|
|00003200| 0d 11 30 28 41 44 44 20 | 20 20 52 35 2c 52 30 2c |..0(ADD | R5,R0,|
|00003210| 52 34 20 3b 20 73 74 61 | 72 74 20 6f 66 20 66 69 |R4 ; sta|rt of fi|
|00003220| 72 73 74 20 6c 69 6e 65 | 0d 11 3a 18 2e 6d 69 6e |rst line|..:..min|
|00003230| 65 61 64 6a 61 63 65 6e | 63 79 5f 79 6c 6f 6f 70 |eadjacen|cy_yloop|
|00003240| 0d 11 44 25 4d 4f 56 20 | 20 20 52 36 2c 52 31 20 |..D%MOV | R6,R1 |
|00003250| 20 20 20 3b 20 78 20 63 | 6f 6c 75 6d 6e 20 63 6f | ; x c|olumn co|
|00003260| 75 6e 74 65 72 0d 11 4e | 18 2e 6d 69 6e 65 61 64 |unter..N|..minead|
|00003270| 6a 61 63 65 6e 63 79 5f | 78 6c 6f 6f 70 0d 11 58 |jacency_|xloop..X|
|00003280| 2c 41 44 44 20 20 20 52 | 35 2c 52 35 2c 23 31 20 |,ADD R|5,R5,#1 |
|00003290| 3b 20 61 64 64 72 65 73 | 73 20 6f 66 20 63 75 72 |; addres|s of cur|
|000032a0| 72 65 6e 74 20 63 65 6c | 6c 0d 11 62 21 4c 44 52 |rent cel|l..b!LDR|
|000032b0| 42 20 20 52 38 2c 5b 52 | 35 5d 20 20 3b 20 63 75 |B R8,[R|5] ; cu|
|000032c0| 72 72 65 6e 74 20 63 65 | 6c 6c 0d 11 6c 25 4c 44 |rrent ce|ll..l%LD|
|000032d0| 52 42 20 20 52 37 2c 5b | 52 35 2c 23 2d 31 5d 20 |RB R7,[|R5,#-1] |
|000032e0| 3b 20 63 65 6c 6c 20 6f | 6e 65 20 6c 65 66 74 0d |; cell o|ne left.|
|000032f0| 11 76 1d 54 53 54 20 20 | 20 52 37 2c 23 31 20 20 |.v.TST | R7,#1 |
|00003300| 20 20 20 20 20 3b 20 6d | 69 6e 65 3f 0d 11 80 20 | ; m|ine?... |
|00003310| 42 4e 45 20 20 20 6d 69 | 6e 65 61 64 6a 61 63 65 |BNE mi|neadjace|
|00003320| 6e 63 79 5f 6d 61 72 6b | 63 65 6c 6c 0d 11 8a 26 |ncy_mark|cell...&|
|00003330| 4c 44 52 42 20 20 52 37 | 2c 5b 52 35 2c 23 31 5d |LDRB R7|,[R5,#1]|
|00003340| 20 20 3b 20 63 65 6c 6c | 20 6f 6e 65 20 72 69 67 | ; cell| one rig|
|00003350| 68 74 0d 11 94 1d 54 53 | 54 20 20 20 52 37 2c 23 |ht....TS|T R7,#|
|00003360| 31 20 20 20 20 20 20 20 | 3b 20 6d 69 6e 65 3f 0d |1 |; mine?.|
|00003370| 11 9e 20 42 4e 45 20 20 | 20 6d 69 6e 65 61 64 6a |.. BNE | mineadj|
|00003380| 61 63 65 6e 63 79 5f 6d | 61 72 6b 63 65 6c 6c 0d |acency_m|arkcell.|
|00003390| 11 a8 21 53 55 42 20 20 | 20 52 31 30 2c 52 35 2c |..!SUB | R10,R5,|
|000033a0| 52 34 20 20 20 3b 20 72 | 6f 77 20 61 62 6f 76 65 |R4 ; r|ow above|
|000033b0| 0d 11 b2 22 4c 44 52 42 | 20 20 52 37 2c 5b 52 31 |..."LDRB| R7,[R1|
|000033c0| 30 5d 20 20 20 20 3b 20 | 63 65 6c 6c 20 61 62 6f |0] ; |cell abo|
|000033d0| 76 65 0d 11 bc 1d 54 53 | 54 20 20 20 52 37 2c 23 |ve....TS|T R7,#|
|000033e0| 31 20 20 20 20 20 20 20 | 3b 20 6d 69 6e 65 3f 0d |1 |; mine?.|
|000033f0| 11 c6 20 42 4e 45 20 20 | 20 6d 69 6e 65 61 64 6a |.. BNE | mineadj|
|00003400| 61 63 65 6e 63 79 5f 6d | 61 72 6b 63 65 6c 6c 0d |acency_m|arkcell.|
|00003410| 11 d0 32 4c 44 52 42 20 | 20 52 37 2c 5b 52 31 30 |..2LDRB | R7,[R10|
|00003420| 2c 23 2d 31 5d 20 3b 20 | 63 65 6c 6c 20 6f 6e 65 |,#-1] ; |cell one|
|00003430| 20 6c 65 66 74 20 28 61 | 6e 64 20 61 62 6f 76 65 | left (a|nd above|
|00003440| 29 0d 11 da 1d 54 53 54 | 20 20 20 52 37 2c 23 31 |)....TST| R7,#1|
|00003450| 20 20 20 20 20 20 20 3b | 20 6d 69 6e 65 3f 0d 11 | ;| mine?..|
|00003460| e4 20 42 4e 45 20 20 20 | 6d 69 6e 65 61 64 6a 61 |. BNE |mineadja|
|00003470| 63 65 6e 63 79 5f 6d 61 | 72 6b 63 65 6c 6c 0d 11 |cency_ma|rkcell..|
|00003480| ee 32 4c 44 52 42 20 20 | 52 37 2c 5b 52 31 30 2c |.2LDRB |R7,[R10,|
|00003490| 23 31 5d 20 3b 20 63 65 | 6c 6c 20 6f 6e 65 20 72 |#1] ; ce|ll one r|
|000034a0| 69 67 68 74 20 28 61 6e | 64 20 61 62 6f 76 65 29 |ight (an|d above)|
|000034b0| 0d 11 f8 1d 54 53 54 20 | 20 20 52 37 2c 23 31 20 |....TST | R7,#1 |
|000034c0| 20 20 20 20 20 20 3b 20 | 6d 69 6e 65 3f 0d 12 02 | ; |mine?...|
|000034d0| 20 42 4e 45 20 20 20 6d | 69 6e 65 61 64 6a 61 63 | BNE m|ineadjac|
|000034e0| 65 6e 63 79 5f 6d 61 72 | 6b 63 65 6c 6c 0d 12 0c |ency_mar|kcell...|
|000034f0| 21 41 44 44 20 20 20 52 | 31 30 2c 52 35 2c 52 34 |!ADD R|10,R5,R4|
|00003500| 20 20 20 3b 20 72 6f 77 | 20 62 65 6c 6f 77 0d 12 | ; row| below..|
|00003510| 16 22 4c 44 52 42 20 20 | 52 37 2c 5b 52 31 30 5d |."LDRB |R7,[R10]|
|00003520| 20 20 20 20 3b 20 63 65 | 6c 6c 20 62 65 6c 6f 77 | ; ce|ll below|
|00003530| 0d 12 20 1d 54 53 54 20 | 20 20 52 37 2c 23 31 20 |.. .TST | R7,#1 |
|00003540| 20 20 20 20 20 20 3b 20 | 6d 69 6e 65 3f 0d 12 2a | ; |mine?..*|
|00003550| 20 42 4e 45 20 20 20 6d | 69 6e 65 61 64 6a 61 63 | BNE m|ineadjac|
|00003560| 65 6e 63 79 5f 6d 61 72 | 6b 63 65 6c 6c 0d 12 34 |ency_mar|kcell..4|
|00003570| 32 4c 44 52 42 20 20 52 | 37 2c 5b 52 31 30 2c 23 |2LDRB R|7,[R10,#|
|00003580| 2d 31 5d 20 3b 20 63 65 | 6c 6c 20 6f 6e 65 20 6c |-1] ; ce|ll one l|
|00003590| 65 66 74 20 28 61 6e 64 | 20 62 65 6c 6f 77 29 0d |eft (and| below).|
|000035a0| 12 3e 1d 54 53 54 20 20 | 20 52 37 2c 23 31 20 20 |.>.TST | R7,#1 |
|000035b0| 20 20 20 20 20 3b 20 6d | 69 6e 65 3f 0d 12 48 20 | ; m|ine?..H |
|000035c0| 42 4e 45 20 20 20 6d 69 | 6e 65 61 64 6a 61 63 65 |BNE mi|neadjace|
|000035d0| 6e 63 79 5f 6d 61 72 6b | 63 65 6c 6c 0d 12 52 32 |ncy_mark|cell..R2|
|000035e0| 4c 44 52 42 20 20 52 37 | 2c 5b 52 31 30 2c 23 31 |LDRB R7|,[R10,#1|
|000035f0| 5d 20 3b 20 63 65 6c 6c | 20 6f 6e 65 20 72 69 67 |] ; cell| one rig|
|00003600| 68 74 20 28 61 6e 64 20 | 62 65 6c 6f 77 29 0d 12 |ht (and |below)..|
|00003610| 5c 1d 54 53 54 20 20 20 | 52 37 2c 23 31 20 20 20 |\.TST |R7,#1 |
|00003620| 20 20 20 20 3b 20 6d 69 | 6e 65 3f 0d 12 66 1b 2e | ; mi|ne?..f..|
|00003630| 6d 69 6e 65 61 64 6a 61 | 63 65 6e 63 79 5f 6d 61 |mineadja|cency_ma|
|00003640| 72 6b 63 65 6c 6c 0d 12 | 70 2c 84 52 4e 45 20 52 |rkcell..|p,.RNE R|
|00003650| 38 2c 52 38 2c 23 25 31 | 30 30 30 30 20 20 3b 20 |8,R8,#%1|0000 ; |
|00003660| 61 64 6a 61 63 65 6e 74 | 20 74 6f 20 61 20 6d 69 |adjacent| to a mi|
|00003670| 6e 65 0d 12 7a 17 42 49 | 43 45 51 20 52 38 2c 52 |ne..z.BI|CEQ R8,R|
|00003680| 38 2c 23 25 31 30 30 30 | 30 0d 12 84 11 53 54 52 |8,#%1000|0....STR|
|00003690| 42 20 20 52 38 2c 5b 52 | 35 5d 0d 12 8e 12 53 55 |B R8,[R|5]....SU|
|000036a0| 42 53 20 20 52 36 2c 52 | 36 2c 23 31 0d 12 98 1d |BS R6,R|6,#1....|
|000036b0| 42 47 54 20 20 20 6d 69 | 6e 65 61 64 6a 61 63 65 |BGT mi|neadjace|
|000036c0| 6e 63 79 5f 78 6c 6f 6f | 70 0d 12 a2 29 41 44 44 |ncy_xloo|p...)ADD|
|000036d0| 20 20 20 52 35 2c 52 35 | 2c 23 32 20 20 20 20 3b | R5,R5|,#2 ;|
|000036e0| 20 6e 65 78 74 20 6c 69 | 6e 65 20 61 64 64 72 65 | next li|ne addre|
|000036f0| 73 73 0d 12 ac 12 53 55 | 42 53 20 20 52 33 2c 52 |ss....SU|BS R3,R|
|00003700| 33 2c 23 31 0d 12 b6 1d | 42 47 54 20 20 20 6d 69 |3,#1....|BGT mi|
|00003710| 6e 65 61 64 6a 61 63 65 | 6e 63 79 5f 79 6c 6f 6f |neadjace|ncy_yloo|
|00003720| 70 0d 12 c0 1a 4d 4f 56 | 20 50 43 2c 52 31 34 20 |p....MOV| PC,R14 |
|00003730| 20 20 20 20 20 3b 20 65 | 78 69 74 0d 12 ca 05 3b | ; e|xit....;|
|00003740| 0d 12 d4 15 2e 75 6e 6b | 6e 6f 77 6e 61 64 6a 61 |.....unk|nownadja|
|00003750| 63 65 6e 63 79 0d 12 de | 38 3b 20 6f 6e 20 65 6e |cency...|8; on en|
|00003760| 74 72 79 2c 20 52 30 3d | 62 61 73 65 25 2c 20 52 |try, R0=|base%, R|
|00003770| 31 3d 78 73 69 7a 65 25 | 2c 20 52 32 3d 79 73 69 |1=xsize%|, R2=ysi|
|00003780| 7a 65 25 2c 20 52 33 3d | 64 65 73 74 25 0d 12 e8 |ze%, R3=|dest%...|
|00003790| 17 4d 4f 56 20 20 20 52 | 31 31 2c 52 33 20 3b 20 |.MOV R|11,R3 ; |
|000037a0| 64 65 73 74 0d 12 f2 21 | 4d 4f 56 20 20 20 52 33 |dest...!|MOV R3|
|000037b0| 2c 52 32 20 20 3b 20 79 | 20 6c 69 6e 65 20 63 6f |,R2 ; y| line co|
|000037c0| 75 6e 74 65 72 0d 12 fc | 23 41 44 44 20 20 20 52 |unter...|#ADD R|
|000037d0| 34 2c 52 31 2c 23 32 20 | 3b 20 62 79 74 65 73 20 |4,R1,#2 |; bytes |
|000037e0| 70 65 72 20 6c 69 6e 65 | 0d 13 06 28 41 44 44 20 |per line|...(ADD |
|000037f0| 20 20 52 35 2c 52 30 2c | 52 34 20 3b 20 73 74 61 | R5,R0,|R4 ; sta|
|00003800| 72 74 20 6f 66 20 66 69 | 72 73 74 20 6c 69 6e 65 |rt of fi|rst line|
|00003810| 0d 13 10 14 41 44 44 20 | 20 20 52 31 31 2c 52 31 |....ADD | R11,R1|
|00003820| 31 2c 52 34 0d 13 1a 1b | 2e 75 6e 6b 6e 6f 77 6e |1,R4....|.unknown|
|00003830| 61 64 6a 61 63 65 6e 63 | 79 5f 79 6c 6f 6f 70 0d |adjacenc|y_yloop.|
|00003840| 13 24 25 4d 4f 56 20 20 | 20 52 36 2c 52 31 20 20 |.$%MOV | R6,R1 |
|00003850| 20 20 3b 20 78 20 63 6f | 6c 75 6d 6e 20 63 6f 75 | ; x co|lumn cou|
|00003860| 6e 74 65 72 0d 13 2e 1b | 2e 75 6e 6b 6e 6f 77 6e |nter....|.unknown|
|00003870| 61 64 6a 61 63 65 6e 63 | 79 5f 78 6c 6f 6f 70 0d |adjacenc|y_xloop.|
|00003880| 13 38 2c 41 44 44 20 20 | 20 52 35 2c 52 35 2c 23 |.8,ADD | R5,R5,#|
|00003890| 31 20 3b 20 61 64 64 72 | 65 73 73 20 6f 66 20 63 |1 ; addr|ess of c|
|000038a0| 75 72 72 65 6e 74 20 63 | 65 6c 6c 0d 13 42 14 41 |urrent c|ell..B.A|
|000038b0| 44 44 20 20 20 52 31 31 | 2c 52 31 31 2c 23 31 0d |DD R11|,R11,#1.|
|000038c0| 13 4c 21 4c 44 52 42 20 | 20 52 38 2c 5b 52 35 5d |.L!LDRB | R8,[R5]|
|000038d0| 20 20 3b 20 63 75 72 72 | 65 6e 74 20 63 65 6c 6c | ; curr|ent cell|
|000038e0| 0d 13 56 1b 54 53 54 20 | 20 20 52 38 2c 23 25 31 |..V.TST | R8,#%1|
|000038f0| 30 20 20 3b 20 63 6c 65 | 61 72 3f 0d 13 60 27 42 |0 ; cle|ar?..`'B|
|00003900| 45 51 20 20 20 75 6e 6b | 6e 6f 77 6e 61 64 6a 61 |EQ unk|nownadja|
|00003910| 63 65 6e 63 79 5f 73 6b | 69 70 74 68 69 73 63 65 |cency_sk|ipthisce|
|00003920| 6c 6c 0d 13 6a 25 4c 44 | 52 42 20 20 52 37 2c 5b |ll..j%LD|RB R7,[|
|00003930| 52 35 2c 23 2d 31 5d 20 | 3b 20 63 65 6c 6c 20 6f |R5,#-1] |; cell o|
|00003940| 6e 65 20 6c 65 66 74 0d | 13 74 1e 54 53 54 20 20 |ne left.|.t.TST |
|00003950| 20 52 37 2c 23 25 31 30 | 20 20 20 20 20 3b 20 63 | R7,#%10| ; c|
|00003960| 6c 65 61 72 3f 0d 13 7e | 23 42 45 51 20 20 20 75 |lear?..~|#BEQ u|
|00003970| 6e 6b 6e 6f 77 6e 61 64 | 6a 61 63 65 6e 63 79 5f |nknownad|jacency_|
|00003980| 6d 61 72 6b 63 65 6c 6c | 0d 13 88 26 4c 44 52 42 |markcell|...&LDRB|
|00003990| 20 20 52 37 2c 5b 52 35 | 2c 23 31 5d 20 20 3b 20 | R7,[R5|,#1] ; |
|000039a0| 63 65 6c 6c 20 6f 6e 65 | 20 72 69 67 68 74 0d 13 |cell one| right..|
|000039b0| 92 1e 54 53 54 20 20 20 | 52 37 2c 23 25 31 30 20 |..TST |R7,#%10 |
|000039c0| 20 20 20 20 3b 20 63 6c | 65 61 72 3f 0d 13 9c 23 | ; cl|ear?...#|
|000039d0| 42 45 51 20 20 20 75 6e | 6b 6e 6f 77 6e 61 64 6a |BEQ un|knownadj|
|000039e0| 61 63 65 6e 63 79 5f 6d | 61 72 6b 63 65 6c 6c 0d |acency_m|arkcell.|
|000039f0| 13 a6 21 53 55 42 20 20 | 20 52 31 30 2c 52 35 2c |..!SUB | R10,R5,|
|00003a00| 52 34 20 20 20 3b 20 72 | 6f 77 20 61 62 6f 76 65 |R4 ; r|ow above|
|00003a10| 0d 13 b0 22 4c 44 52 42 | 20 20 52 37 2c 5b 52 31 |..."LDRB| R7,[R1|
|00003a20| 30 5d 20 20 20 20 3b 20 | 63 65 6c 6c 20 61 62 6f |0] ; |cell abo|
|00003a30| 76 65 0d 13 ba 1e 54 53 | 54 20 20 20 52 37 2c 23 |ve....TS|T R7,#|
|00003a40| 25 31 30 20 20 20 20 20 | 3b 20 63 6c 65 61 72 3f |%10 |; clear?|
|00003a50| 0d 13 c4 23 42 45 51 20 | 20 20 75 6e 6b 6e 6f 77 |...#BEQ | unknow|
|00003a60| 6e 61 64 6a 61 63 65 6e | 63 79 5f 6d 61 72 6b 63 |nadjacen|cy_markc|
|00003a70| 65 6c 6c 0d 13 ce 32 4c | 44 52 42 20 20 52 37 2c |ell...2L|DRB R7,|
|00003a80| 5b 52 31 30 2c 23 2d 31 | 5d 20 3b 20 63 65 6c 6c |[R10,#-1|] ; cell|
|00003a90| 20 6f 6e 65 20 6c 65 66 | 74 20 28 61 6e 64 20 61 | one lef|t (and a|
|00003aa0| 62 6f 76 65 29 0d 13 d8 | 1e 54 53 54 20 20 20 52 |bove)...|.TST R|
|00003ab0| 37 2c 23 25 31 30 20 20 | 20 20 20 3b 20 63 6c 65 |7,#%10 | ; cle|
|00003ac0| 61 72 3f 0d 13 e2 23 42 | 45 51 20 20 20 75 6e 6b |ar?...#B|EQ unk|
|00003ad0| 6e 6f 77 6e 61 64 6a 61 | 63 65 6e 63 79 5f 6d 61 |nownadja|cency_ma|
|00003ae0| 72 6b 63 65 6c 6c 0d 13 | ec 32 4c 44 52 42 20 20 |rkcell..|.2LDRB |
|00003af0| 52 37 2c 5b 52 31 30 2c | 23 31 5d 20 3b 20 63 65 |R7,[R10,|#1] ; ce|
|00003b00| 6c 6c 20 6f 6e 65 20 72 | 69 67 68 74 20 28 61 6e |ll one r|ight (an|
|00003b10| 64 20 61 62 6f 76 65 29 | 0d 13 f6 1e 54 53 54 20 |d above)|....TST |
|00003b20| 20 20 52 37 2c 23 25 31 | 30 20 20 20 20 20 3b 20 | R7,#%1|0 ; |
|00003b30| 63 6c 65 61 72 3f 0d 14 | 00 23 42 45 51 20 20 20 |clear?..|.#BEQ |
|00003b40| 75 6e 6b 6e 6f 77 6e 61 | 64 6a 61 63 65 6e 63 79 |unknowna|djacency|
|00003b50| 5f 6d 61 72 6b 63 65 6c | 6c 0d 14 0a 21 41 44 44 |_markcel|l...!ADD|
|00003b60| 20 20 20 52 31 30 2c 52 | 35 2c 52 34 20 20 20 3b | R10,R|5,R4 ;|
|00003b70| 20 72 6f 77 20 62 65 6c | 6f 77 0d 14 14 22 4c 44 | row bel|ow..."LD|
|00003b80| 52 42 20 20 52 37 2c 5b | 52 31 30 5d 20 20 20 20 |RB R7,[|R10] |
|00003b90| 3b 20 63 65 6c 6c 20 62 | 65 6c 6f 77 0d 14 1e 1e |; cell b|elow....|
|00003ba0| 54 53 54 20 20 20 52 37 | 2c 23 25 31 30 20 20 20 |TST R7|,#%10 |
|00003bb0| 20 20 3b 20 63 6c 65 61 | 72 3f 0d 14 28 23 42 45 | ; clea|r?..(#BE|
|00003bc0| 51 20 20 20 75 6e 6b 6e | 6f 77 6e 61 64 6a 61 63 |Q unkn|ownadjac|
|00003bd0| 65 6e 63 79 5f 6d 61 72 | 6b 63 65 6c 6c 0d 14 32 |ency_mar|kcell..2|
|00003be0| 32 4c 44 52 42 20 20 52 | 37 2c 5b 52 31 30 2c 23 |2LDRB R|7,[R10,#|
|00003bf0| 2d 31 5d 20 3b 20 63 65 | 6c 6c 20 6f 6e 65 20 6c |-1] ; ce|ll one l|
|00003c00| 65 66 74 20 28 61 6e 64 | 20 62 65 6c 6f 77 29 0d |eft (and| below).|
|00003c10| 14 3c 1e 54 53 54 20 20 | 20 52 37 2c 23 25 31 30 |.<.TST | R7,#%10|
|00003c20| 20 20 20 20 20 3b 20 63 | 6c 65 61 72 3f 0d 14 46 | ; c|lear?..F|
|00003c30| 23 42 45 51 20 20 20 75 | 6e 6b 6e 6f 77 6e 61 64 |#BEQ u|nknownad|
|00003c40| 6a 61 63 65 6e 63 79 5f | 6d 61 72 6b 63 65 6c 6c |jacency_|markcell|
|00003c50| 0d 14 50 32 4c 44 52 42 | 20 20 52 37 2c 5b 52 31 |..P2LDRB| R7,[R1|
|00003c60| 30 2c 23 31 5d 20 3b 20 | 63 65 6c 6c 20 6f 6e 65 |0,#1] ; |cell one|
|00003c70| 20 72 69 67 68 74 20 28 | 61 6e 64 20 62 65 6c 6f | right (|and belo|
|00003c80| 77 29 0d 14 5a 1e 54 53 | 54 20 20 20 52 37 2c 23 |w)..Z.TS|T R7,#|
|00003c90| 25 31 30 20 20 20 20 20 | 3b 20 63 6c 65 61 72 3f |%10 |; clear?|
|00003ca0| 0d 14 64 1e 2e 75 6e 6b | 6e 6f 77 6e 61 64 6a 61 |..d..unk|nownadja|
|00003cb0| 63 65 6e 63 79 5f 6d 61 | 72 6b 63 65 6c 6c 0d 14 |cency_ma|rkcell..|
|00003cc0| 6e 20 84 52 45 51 20 52 | 38 2c 52 38 2c 23 25 31 |n .REQ R|8,R8,#%1|
|00003cd0| 30 30 30 20 20 20 3b 20 | 75 70 64 61 74 65 0d 14 |000 ; |update..|
|00003ce0| 78 2f 42 49 43 45 51 20 | 52 38 2c 52 38 2c 23 25 |x/BICEQ |R8,R8,#%|
|00003cf0| 30 30 31 30 20 20 20 3b | 20 6d 61 6b 65 20 75 6e |0010 ;| make un|
|00003d00| 63 6c 65 61 72 65 64 20 | 61 67 61 69 6e 0d 14 82 |cleared |again...|
|00003d10| 22 2e 75 6e 6b 6e 6f 77 | 6e 61 64 6a 61 63 65 6e |".unknow|nadjacen|
|00003d20| 63 79 5f 73 6b 69 70 74 | 68 69 73 63 65 6c 6c 0d |cy_skipt|hiscell.|
|00003d30| 14 8c 12 53 54 52 42 20 | 20 52 38 2c 5b 52 31 31 |...STRB | R8,[R11|
|00003d40| 5d 0d 14 96 12 53 55 42 | 53 20 20 52 36 2c 52 36 |]....SUB|S R6,R6|
|00003d50| 2c 23 31 0d 14 a0 20 42 | 47 54 20 20 20 75 6e 6b |,#1... B|GT unk|
|00003d60| 6e 6f 77 6e 61 64 6a 61 | 63 65 6e 63 79 5f 78 6c |nownadja|cency_xl|
|00003d70| 6f 6f 70 0d 14 aa 29 41 | 44 44 20 20 20 52 35 2c |oop...)A|DD R5,|
|00003d80| 52 35 2c 23 32 20 20 20 | 20 3b 20 6e 65 78 74 20 |R5,#2 | ; next |
|00003d90| 6c 69 6e 65 20 61 64 64 | 72 65 73 73 0d 14 b4 14 |line add|ress....|
|00003da0| 41 44 44 20 20 20 52 31 | 31 2c 52 31 31 2c 23 32 |ADD R1|1,R11,#2|
|00003db0| 0d 14 be 12 53 55 42 53 | 20 20 52 33 2c 52 33 2c |....SUBS| R3,R3,|
|00003dc0| 23 31 0d 14 c8 20 42 47 | 54 20 20 20 75 6e 6b 6e |#1... BG|T unkn|
|00003dd0| 6f 77 6e 61 64 6a 61 63 | 65 6e 63 79 5f 79 6c 6f |ownadjac|ency_ylo|
|00003de0| 6f 70 0d 14 d2 1a 4d 4f | 56 20 50 43 2c 52 31 34 |op....MO|V PC,R14|
|00003df0| 20 20 20 20 20 20 3b 20 | 65 78 69 74 0d 14 dc 05 | ; |exit....|
|00003e00| 3b 0d 14 e6 12 2e 67 65 | 74 73 63 72 65 65 6e 69 |;.....ge|tscreeni|
|00003e10| 6e 66 6f 0d 14 f0 1f 41 | 44 52 20 20 20 52 30 2c |nfo....A|DR R0,|
|00003e20| 76 64 75 76 61 72 69 61 | 62 6c 65 72 65 71 75 65 |vduvaria|blereque|
|00003e30| 73 74 0d 14 fa 1c 41 44 | 52 20 20 20 52 31 2c 76 |st....AD|R R1,v|
|00003e40| 64 75 76 61 72 69 61 62 | 6c 65 6c 69 73 74 0d 15 |duvariab|lelist..|
|00003e50| 04 1f 53 57 49 20 20 20 | 22 4f 53 5f 52 65 61 64 |..SWI |"OS_Read|
|00003e60| 56 64 75 56 61 72 69 61 | 62 6c 65 73 22 0d 15 0e |VduVaria|bles"...|
|00003e70| 10 4d 4f 56 20 20 20 50 | 43 2c 52 31 34 0d 15 18 |.MOV P|C,R14...|
|00003e80| 17 2e 76 64 75 76 61 72 | 69 61 62 6c 65 72 65 71 |..vduvar|iablereq|
|00003e90| 75 65 73 74 0d 15 22 2a | 45 51 55 44 20 20 31 34 |uest.."*|EQUD 14|
|00003ea0| 38 20 20 20 3b 20 20 23 | 30 2e 20 73 63 72 65 65 |8 ; #|0. scree|
|00003eb0| 6e 20 62 61 73 65 20 61 | 64 64 72 65 73 73 0d 15 |n base a|ddress..|
|00003ec0| 2c 2b 45 51 55 44 20 20 | 36 20 20 20 20 20 3b 20 |,+EQUD |6 ; |
|00003ed0| 20 23 34 2e 20 6c 69 6e | 65 20 6c 65 6e 67 74 68 | #4. lin|e length|
|00003ee0| 20 69 6e 20 62 79 74 65 | 73 0d 15 36 31 45 51 55 | in byte|s..61EQU|
|00003ef0| 44 20 20 33 20 20 20 20 | 20 3b 20 20 23 38 2e 20 |D 3 | ; #8. |
|00003f00| 6d 61 78 20 63 6f 6c 6f | 75 72 20 28 74 6f 20 63 |max colo|ur (to c|
|00003f10| 68 65 63 6b 20 3d 20 31 | 35 29 0d 15 40 25 45 51 |heck = 1|5)..@%EQ|
|00003f20| 55 44 20 20 31 20 20 20 | 20 20 3b 20 23 31 32 2e |UD 1 | ; #12.|
|00003f30| 20 6d 61 78 20 63 6f 6c | 75 6d 6e 73 20 2d 31 0d | max col|umns -1.|
|00003f40| 15 4a 22 45 51 55 44 20 | 20 32 20 20 20 20 20 3b |.J"EQUD | 2 ;|
|00003f50| 20 23 31 36 2e 20 6d 61 | 78 20 72 6f 77 73 20 2d | #16. ma|x rows -|
|00003f60| 31 0d 15 54 1b 45 51 55 | 44 20 20 34 20 20 20 20 |1..T.EQU|D 4 |
|00003f70| 20 3b 20 23 32 30 2e 20 | 78 45 69 67 0d 15 5e 1b | ; #20. |xEig..^.|
|00003f80| 45 51 55 44 20 20 35 20 | 20 20 20 20 3b 20 23 32 |EQUD 5 | ; #2|
|00003f90| 34 2e 20 79 45 69 67 0d | 15 68 0c 45 51 55 44 20 |4. yEig.|.h.EQUD |
|00003fa0| 20 2d 31 0d 15 72 14 2e | 76 64 75 76 61 72 69 61 | -1..r..|vduvaria|
|00003fb0| 62 6c 65 6c 69 73 74 0d | 15 7c 2a 45 51 55 44 20 |blelist.|.|*EQUD |
|00003fc0| 20 31 34 38 20 20 20 3b | 20 20 23 30 2e 20 73 63 | 148 ;| #0. sc|
|00003fd0| 72 65 65 6e 20 62 61 73 | 65 20 61 64 64 72 65 73 |reen bas|e addres|
|00003fe0| 73 0d 15 86 2b 45 51 55 | 44 20 20 36 20 20 20 20 |s...+EQU|D 6 |
|00003ff0| 20 3b 20 20 23 34 2e 20 | 6c 69 6e 65 20 6c 65 6e | ; #4. |line len|
|00004000| 67 74 68 20 69 6e 20 62 | 79 74 65 73 0d 15 90 31 |gth in b|ytes...1|
|00004010| 45 51 55 44 20 20 33 20 | 20 20 20 20 3b 20 20 23 |EQUD 3 | ; #|
|00004020| 38 2e 20 6d 61 78 20 63 | 6f 6c 6f 75 72 20 28 74 |8. max c|olour (t|
|00004030| 6f 20 63 68 65 63 6b 20 | 3d 20 31 35 29 0d 15 9a |o check |= 15)...|
|00004040| 25 45 51 55 44 20 20 31 | 20 20 20 20 20 3b 20 23 |%EQUD 1| ; #|
|00004050| 31 32 2e 20 6d 61 78 20 | 63 6f 6c 75 6d 6e 73 20 |12. max |columns |
|00004060| 2d 31 0d 15 a4 22 45 51 | 55 44 20 20 32 20 20 20 |-1..."EQ|UD 2 |
|00004070| 20 20 3b 20 23 31 36 2e | 20 6d 61 78 20 72 6f 77 | ; #16.| max row|
|00004080| 73 20 2d 31 0d 15 ae 1b | 45 51 55 44 20 20 34 20 |s -1....|EQUD 4 |
|00004090| 20 20 20 20 3b 20 23 32 | 30 2e 20 78 45 69 67 0d | ; #2|0. xEig.|
|000040a0| 15 b8 1b 45 51 55 44 20 | 20 35 20 20 20 20 20 3b |...EQUD | 5 ;|
|000040b0| 20 23 32 34 2e 20 79 45 | 69 67 0d 15 c2 0c 45 51 | #24. yE|ig....EQ|
|000040c0| 55 44 20 20 2d 31 0d 15 | cc 05 3b 0d 15 d6 11 2e |UD -1..|..;.....|
|000040d0| 75 70 64 61 74 65 73 63 | 72 65 65 6e 0d 15 e0 2e |updatesc|reen....|
|000040e0| 3b 20 6f 6e 20 65 6e 74 | 72 79 2c 20 52 30 3d 62 |; on ent|ry, R0=b|
|000040f0| 61 73 65 25 2c 20 52 31 | 3d 78 73 69 7a 65 25 2c |ase%, R1|=xsize%,|
|00004100| 20 52 32 3d 79 73 69 7a | 65 25 0d 15 ea 14 53 54 | R2=ysiz|e%....ST|
|00004110| 4d 46 44 20 52 31 33 21 | 2c 7b 52 31 34 7d 0d 15 |MFD R13!|,{R14}..|
|00004120| f4 1d 41 44 52 20 20 20 | 52 31 30 2c 76 64 75 76 |..ADR |R10,vduv|
|00004130| 61 72 69 61 62 6c 65 6c | 69 73 74 0d 15 fe 23 4d |ariablel|ist...#M|
|00004140| 4f 56 20 20 20 52 33 2c | 52 32 20 20 20 20 3b 20 |OV R3,|R2 ; |
|00004150| 79 20 6c 69 6e 65 20 63 | 6f 75 6e 74 65 72 0d 16 |y line c|ounter..|
|00004160| 08 23 41 44 44 20 20 20 | 52 34 2c 52 31 2c 23 32 |.#ADD |R4,R1,#2|
|00004170| 20 3b 20 62 79 74 65 73 | 20 70 65 72 20 6c 69 6e | ; bytes| per lin|
|00004180| 65 0d 16 12 28 41 44 44 | 20 20 20 52 35 2c 52 30 |e...(ADD| R5,R0|
|00004190| 2c 52 34 20 3b 20 73 74 | 61 72 74 20 6f 66 20 66 |,R4 ; st|art of f|
|000041a0| 69 72 73 74 20 6c 69 6e | 65 0d 16 1c 17 2e 75 70 |irst lin|e.....up|
|000041b0| 64 61 74 65 73 63 72 65 | 65 6e 5f 79 6c 6f 6f 70 |datescre|en_yloop|
|000041c0| 0d 16 26 25 4d 4f 56 20 | 20 20 52 36 2c 52 31 20 |..&%MOV | R6,R1 |
|000041d0| 20 20 20 3b 20 78 20 63 | 6f 6c 75 6d 6e 20 63 6f | ; x c|olumn co|
|000041e0| 75 6e 74 65 72 0d 16 30 | 17 2e 75 70 64 61 74 65 |unter..0|..update|
|000041f0| 73 63 72 65 65 6e 5f 78 | 6c 6f 6f 70 0d 16 3a 2c |screen_x|loop..:,|
|00004200| 41 44 44 20 20 20 52 35 | 2c 52 35 2c 23 31 20 3b |ADD R5|,R5,#1 ;|
|00004210| 20 61 64 64 72 65 73 73 | 20 6f 66 20 63 75 72 72 | address| of curr|
|00004220| 65 6e 74 20 63 65 6c 6c | 0d 16 44 11 4c 44 52 42 |ent cell|..D.LDRB|
|00004230| 20 20 52 37 2c 5b 52 35 | 5d 0d 16 4e 27 54 53 54 | R7,[R5|]..N'TST|
|00004240| 53 20 20 52 37 2c 23 25 | 30 31 30 30 30 20 20 3b |S R7,#%|01000 ;|
|00004250| 20 6e 65 65 64 73 20 75 | 70 64 61 74 69 6e 67 3f | needs u|pdating?|
|00004260| 0d 16 58 21 42 4c 4e 45 | 20 20 75 70 64 61 74 65 |..X!BLNE| update|
|00004270| 73 63 72 65 65 6e 5f 64 | 6f 74 68 69 73 63 65 6c |screen_d|othiscel|
|00004280| 6c 0d 16 62 12 53 55 42 | 53 20 20 52 36 2c 52 36 |l..b.SUB|S R6,R6|
|00004290| 2c 23 31 0d 16 6c 1c 42 | 47 54 20 20 20 75 70 64 |,#1..l.B|GT upd|
|000042a0| 61 74 65 73 63 72 65 65 | 6e 5f 78 6c 6f 6f 70 0d |atescree|n_xloop.|
|000042b0| 16 76 29 41 44 44 20 20 | 20 52 35 2c 52 35 2c 23 |.v)ADD | R5,R5,#|
|000042c0| 32 20 20 20 20 3b 20 6e | 65 78 74 20 6c 69 6e 65 |2 ; n|ext line|
|000042d0| 20 61 64 64 72 65 73 73 | 0d 16 80 12 53 55 42 53 | address|....SUBS|
|000042e0| 20 20 52 33 2c 52 33 2c | 23 31 0d 16 8a 1c 42 47 | R3,R3,|#1....BG|
|000042f0| 54 20 20 20 75 70 64 61 | 74 65 73 63 72 65 65 6e |T upda|tescreen|
|00004300| 5f 79 6c 6f 6f 70 0d 16 | 94 1c 4c 44 4d 46 44 20 |_yloop..|..LDMFD |
|00004310| 52 31 33 21 2c 7b 50 43 | 7d 20 20 20 3b 20 65 78 |R13!,{PC|} ; ex|
|00004320| 69 74 0d 16 9e 1c 2e 75 | 70 64 61 74 65 73 63 72 |it.....u|pdatescr|
|00004330| 65 65 6e 5f 64 6f 74 68 | 69 73 63 65 6c 6c 0d 16 |een_doth|iscell..|
|00004340| a8 3b 42 49 43 20 20 20 | 52 37 2c 52 37 2c 23 25 |.;BIC |R7,R7,#%|
|00004350| 30 31 30 30 30 20 3b 20 | 64 6f 65 73 20 6e 6f 74 |01000 ; |does not|
|00004360| 20 6e 65 65 64 20 75 70 | 64 61 74 69 6e 67 20 61 | need up|dating a|
|00004370| 66 74 65 72 20 74 68 69 | 73 0d 16 b2 11 53 54 52 |fter thi|s....STR|
|00004380| 42 20 20 52 37 2c 5b 52 | 35 5d 0d 16 bc 25 54 53 |B R7,[R|5]...%TS|
|00004390| 54 20 20 20 52 37 2c 23 | 25 30 30 31 30 30 20 20 |T R7,#|%00100 |
|000043a0| 3b 20 71 75 65 72 69 65 | 64 20 63 65 6c 6c 3f 0d |; querie|d cell?.|
|000043b0| 16 c6 24 4d 4f 56 4e 45 | 20 52 31 31 2c 23 31 30 |..$MOVNE| R11,#10|
|000043c0| 20 20 20 20 20 3b 20 71 | 75 65 72 69 65 64 20 64 | ; q|ueried d|
|000043d0| 65 66 6e 0d 16 d0 22 42 | 4e 45 20 20 20 75 70 64 |efn..."B|NE upd|
|000043e0| 61 74 65 73 63 72 65 65 | 6e 5f 70 6c 6f 74 74 68 |atescree|n_plotth|
|000043f0| 65 63 65 6c 6c 0d 16 da | 1e 54 53 54 20 20 20 52 |ecell...|.TST R|
|00004400| 37 2c 23 25 30 30 30 31 | 30 20 20 3b 20 63 6c 65 |7,#%0001|0 ; cle|
|00004410| 61 72 3f 0d 16 e4 21 ec | 51 20 52 31 31 2c 23 39 |ar?...!.|Q R11,#9|
|00004420| 20 20 20 20 20 20 3b 20 | 75 6e 6b 6e 6f 77 6e 20 | ; |unknown |
|00004430| 64 65 66 6e 0d 16 ee 22 | 42 45 51 20 20 20 75 70 |defn..."|BEQ up|
|00004440| 64 61 74 65 73 63 72 65 | 65 6e 5f 70 6c 6f 74 74 |datescre|en_plott|
|00004450| 68 65 63 65 6c 6c 0d 16 | f8 2b 54 53 54 20 20 20 |hecell..|.+TST |
|00004460| 52 37 2c 23 25 30 30 30 | 30 31 20 20 3b 20 6d 69 |R7,#%000|01 ; mi|
|00004470| 6e 65 20 28 61 6e 64 20 | 63 6c 65 61 72 65 64 29 |ne (and |cleared)|
|00004480| 3f 0d 17 02 22 4d 4f 56 | 4e 45 20 52 31 31 2c 23 |?..."MOV|NE R11,#|
|00004490| 31 31 20 20 20 20 20 3b | 20 6d 69 6e 65 64 20 63 |11 ;| mined c|
|000044a0| 65 6c 6c 0d 17 0c 22 42 | 4e 45 20 20 20 75 70 64 |ell..."B|NE upd|
|000044b0| 61 74 65 73 63 72 65 65 | 6e 5f 70 6c 6f 74 74 68 |atescree|n_plotth|
|000044c0| 65 63 65 6c 6c 0d 17 16 | 24 4d 4f 56 20 20 20 52 |ecell...|$MOV R|
|000044d0| 31 31 2c 23 30 20 20 20 | 20 20 20 3b 20 6d 69 6e |11,#0 | ; min|
|000044e0| 65 20 63 6f 75 6e 74 65 | 72 0d 17 20 25 4c 44 52 |e counte|r.. %LDR|
|000044f0| 42 20 20 52 37 2c 5b 52 | 35 2c 23 2d 31 5d 20 3b |B R7,[R|5,#-1] ;|
|00004500| 20 63 65 6c 6c 20 6f 6e | 65 20 6c 65 66 74 0d 17 | cell on|e left..|
|00004510| 2a 1d 54 53 54 20 20 20 | 52 37 2c 23 31 20 20 20 |*.TST |R7,#1 |
|00004520| 20 20 20 20 3b 20 6d 69 | 6e 65 3f 0d 17 34 14 41 | ; mi|ne?..4.A|
|00004530| 44 44 4e 45 20 52 31 31 | 2c 52 31 31 2c 23 31 0d |DDNE R11|,R11,#1.|
|00004540| 17 3e 26 4c 44 52 42 20 | 20 52 37 2c 5b 52 35 2c |.>&LDRB | R7,[R5,|
|00004550| 23 31 5d 20 20 3b 20 63 | 65 6c 6c 20 6f 6e 65 20 |#1] ; c|ell one |
|00004560| 72 69 67 68 74 0d 17 48 | 1d 54 53 54 20 20 20 52 |right..H|.TST R|
|00004570| 37 2c 23 31 20 20 20 20 | 20 20 20 3b 20 6d 69 6e |7,#1 | ; min|
|00004580| 65 3f 0d 17 52 14 41 44 | 44 4e 45 20 52 31 31 2c |e?..R.AD|DNE R11,|
|00004590| 52 31 31 2c 23 31 0d 17 | 5c 21 53 55 42 20 20 20 |R11,#1..|\!SUB |
|000045a0| 52 35 2c 52 35 2c 52 34 | 20 20 20 20 3b 20 72 6f |R5,R5,R4| ; ro|
|000045b0| 77 20 61 62 6f 76 65 0d | 17 66 22 4c 44 52 42 20 |w above.|.f"LDRB |
|000045c0| 20 52 37 2c 5b 52 35 5d | 20 20 20 20 20 3b 20 63 | R7,[R5]| ; c|
|000045d0| 65 6c 6c 20 61 62 6f 76 | 65 0d 17 70 1d 54 53 54 |ell abov|e..p.TST|
|000045e0| 20 20 20 52 37 2c 23 31 | 20 20 20 20 20 20 20 3b | R7,#1| ;|
|000045f0| 20 6d 69 6e 65 3f 0d 17 | 7a 14 41 44 44 4e 45 20 | mine?..|z.ADDNE |
|00004600| 52 31 31 2c 52 31 31 2c | 23 31 0d 17 84 31 4c 44 |R11,R11,|#1...1LD|
|00004610| 52 42 20 20 52 37 2c 5b | 52 35 2c 23 2d 31 5d 20 |RB R7,[|R5,#-1] |
|00004620| 3b 20 63 65 6c 6c 20 6f | 6e 65 20 6c 65 66 74 20 |; cell o|ne left |
|00004630| 28 61 6e 64 20 61 62 6f | 76 65 29 0d 17 8e 1d 54 |(and abo|ve)....T|
|00004640| 53 54 20 20 20 52 37 2c | 23 31 20 20 20 20 20 20 |ST R7,|#1 |
|00004650| 20 3b 20 6d 69 6e 65 3f | 0d 17 98 14 41 44 44 4e | ; mine?|....ADDN|
|00004660| 45 20 52 31 31 2c 52 31 | 31 2c 23 31 0d 17 a2 32 |E R11,R1|1,#1...2|
|00004670| 4c 44 52 42 20 20 52 37 | 2c 5b 52 35 2c 23 31 5d |LDRB R7|,[R5,#1]|
|00004680| 20 20 3b 20 63 65 6c 6c | 20 6f 6e 65 20 72 69 67 | ; cell| one rig|
|00004690| 68 74 20 28 61 6e 64 20 | 61 62 6f 76 65 29 0d 17 |ht (and |above)..|
|000046a0| ac 1d 54 53 54 20 20 20 | 52 37 2c 23 31 20 20 20 |..TST |R7,#1 |
|000046b0| 20 20 20 20 3b 20 6d 69 | 6e 65 3f 0d 17 b6 14 41 | ; mi|ne?....A|
|000046c0| 44 44 4e 45 20 52 31 31 | 2c 52 31 31 2c 23 31 0d |DDNE R11|,R11,#1.|
|000046d0| 17 c0 21 41 44 44 20 20 | 20 52 35 2c 52 35 2c 52 |..!ADD | R5,R5,R|
|000046e0| 34 20 20 20 20 3b 20 72 | 6f 77 20 62 65 6c 6f 77 |4 ; r|ow below|
|000046f0| 0d 17 ca 12 41 44 44 20 | 20 20 52 35 2c 52 35 2c |....ADD | R5,R5,|
|00004700| 52 34 0d 17 d4 22 4c 44 | 52 42 20 20 52 37 2c 5b |R4..."LD|RB R7,[|
|00004710| 52 35 5d 20 20 20 20 20 | 3b 20 63 65 6c 6c 20 62 |R5] |; cell b|
|00004720| 65 6c 6f 77 0d 17 de 1d | 54 53 54 20 20 20 52 37 |elow....|TST R7|
|00004730| 2c 23 31 20 20 20 20 20 | 20 20 3b 20 6d 69 6e 65 |,#1 | ; mine|
|00004740| 3f 0d 17 e8 14 41 44 44 | 4e 45 20 52 31 31 2c 52 |?....ADD|NE R11,R|
|00004750| 31 31 2c 23 31 0d 17 f2 | 31 4c 44 52 42 20 20 52 |11,#1...|1LDRB R|
|00004760| 37 2c 5b 52 35 2c 23 2d | 31 5d 20 3b 20 63 65 6c |7,[R5,#-|1] ; cel|
|00004770| 6c 20 6f 6e 65 20 6c 65 | 66 74 20 28 61 6e 64 20 |l one le|ft (and |
|00004780| 62 65 6c 6f 77 29 0d 17 | fc 1d 54 53 54 20 20 20 |below)..|..TST |
|00004790| 52 37 2c 23 31 20 20 20 | 20 20 20 20 3b 20 6d 69 |R7,#1 | ; mi|
|000047a0| 6e 65 3f 0d 18 06 14 41 | 44 44 4e 45 20 52 31 31 |ne?....A|DDNE R11|
|000047b0| 2c 52 31 31 2c 23 31 0d | 18 10 32 4c 44 52 42 20 |,R11,#1.|..2LDRB |
|000047c0| 20 52 37 2c 5b 52 35 2c | 23 31 5d 20 20 3b 20 63 | R7,[R5,|#1] ; c|
|000047d0| 65 6c 6c 20 6f 6e 65 20 | 72 69 67 68 74 20 28 61 |ell one |right (a|
|000047e0| 6e 64 20 62 65 6c 6f 77 | 29 0d 18 1a 1d 54 53 54 |nd below|)....TST|
|000047f0| 20 20 20 52 37 2c 23 31 | 20 20 20 20 20 20 20 3b | R7,#1| ;|
|00004800| 20 6d 69 6e 65 3f 0d 18 | 24 14 41 44 44 4e 45 20 | mine?..|$.ADDNE |
|00004810| 52 31 31 2c 52 31 31 2c | 23 31 0d 18 2e 2f 53 55 |R11,R11,|#1.../SU|
|00004820| 42 20 20 20 52 35 2c 52 | 35 2c 52 34 20 20 20 20 |B R5,R|5,R4 |
|00004830| 3b 20 63 6f 72 72 65 63 | 74 20 63 65 6c 6c 20 62 |; correc|t cell b|
|00004840| 61 63 6b 20 61 67 61 69 | 6e 0d 18 38 1d 2e 75 70 |ack agai|n..8..up|
|00004850| 64 61 74 65 73 63 72 65 | 65 6e 5f 70 6c 6f 74 74 |datescre|en_plott|
|00004860| 68 65 63 65 6c 6c 0d 18 | 42 15 4c 44 4d 49 41 20 |hecell..|B.LDMIA |
|00004870| 52 31 30 2c 7b 52 37 2c | 52 38 7d 0d 18 4c 15 4d |R10,{R7,|R8}..L.M|
|00004880| 4f 56 20 20 20 52 39 2c | 52 33 2c 4c 53 4c 23 33 |OV R9,|R3,LSL#3|
|00004890| 0d 18 56 15 4d 4c 41 20 | 20 20 52 39 2c 52 38 2c |..V.MLA | R9,R8,|
|000048a0| 52 39 2c 52 37 0d 18 60 | 12 52 53 42 20 20 20 52 |R9,R7..`|.RSB R|
|000048b0| 37 2c 52 36 2c 52 31 0d | 18 6a 18 41 44 44 20 20 |7,R6,R1.|.j.ADD |
|000048c0| 20 52 37 2c 52 39 2c 52 | 37 2c 4c 53 4c 23 32 0d | R7,R9,R|7,LSL#2.|
|000048d0| 18 74 18 53 55 42 20 20 | 20 52 37 2c 52 37 2c 52 |.t.SUB | R7,R7,R|
|000048e0| 38 2c 4c 53 4c 23 33 0d | 18 7e 15 41 44 52 20 20 |8,LSL#3.|.~.ADR |
|000048f0| 20 52 39 2c 63 65 6c 6c | 64 65 66 73 0d 18 88 19 | R9,cell|defs....|
|00004900| 41 44 44 20 20 20 52 39 | 2c 52 39 2c 52 31 31 2c |ADD R9|,R9,R11,|
|00004910| 4c 53 4c 23 35 0d 18 92 | 15 4c 44 52 20 20 20 52 |LSL#5...|.LDR R|
|00004920| 31 31 2c 5b 52 39 5d 2c | 23 34 0d 18 9c 15 53 54 |11,[R9],|#4....ST|
|00004930| 52 20 20 20 52 31 31 2c | 5b 52 37 5d 2c 52 38 0d |R R11,|[R7],R8.|
|00004940| 18 a6 15 4c 44 52 20 20 | 20 52 31 31 2c 5b 52 39 |...LDR | R11,[R9|
|00004950| 5d 2c 23 34 0d 18 b0 15 | 53 54 52 20 20 20 52 31 |],#4....|STR R1|
|00004960| 31 2c 5b 52 37 5d 2c 52 | 38 0d 18 ba 15 4c 44 52 |1,[R7],R|8....LDR|
|00004970| 20 20 20 52 31 31 2c 5b | 52 39 5d 2c 23 34 0d 18 | R11,[|R9],#4..|
|00004980| c4 15 53 54 52 20 20 20 | 52 31 31 2c 5b 52 37 5d |..STR |R11,[R7]|
|00004990| 2c 52 38 0d 18 ce 15 4c | 44 52 20 20 20 52 31 31 |,R8....L|DR R11|
|000049a0| 2c 5b 52 39 5d 2c 23 34 | 0d 18 d8 15 53 54 52 20 |,[R9],#4|....STR |
|000049b0| 20 20 52 31 31 2c 5b 52 | 37 5d 2c 52 38 0d 18 e2 | R11,[R|7],R8...|
|000049c0| 15 4c 44 52 20 20 20 52 | 31 31 2c 5b 52 39 5d 2c |.LDR R|11,[R9],|
|000049d0| 23 34 0d 18 ec 15 53 54 | 52 20 20 20 52 31 31 2c |#4....ST|R R11,|
|000049e0| 5b 52 37 5d 2c 52 38 0d | 18 f6 15 4c 44 52 20 20 |[R7],R8.|...LDR |
|000049f0| 20 52 31 31 2c 5b 52 39 | 5d 2c 23 34 0d 19 00 15 | R11,[R9|],#4....|
|00004a00| 53 54 52 20 20 20 52 31 | 31 2c 5b 52 37 5d 2c 52 |STR R1|1,[R7],R|
|00004a10| 38 0d 19 0a 15 4c 44 52 | 20 20 20 52 31 31 2c 5b |8....LDR| R11,[|
|00004a20| 52 39 5d 2c 23 34 0d 19 | 14 15 53 54 52 20 20 20 |R9],#4..|..STR |
|00004a30| 52 31 31 2c 5b 52 37 5d | 2c 52 38 0d 19 1e 15 4c |R11,[R7]|,R8....L|
|00004a40| 44 52 20 20 20 52 31 31 | 2c 5b 52 39 5d 2c 23 34 |DR R11|,[R9],#4|
|00004a50| 0d 19 28 15 53 54 52 20 | 20 20 52 31 31 2c 5b 52 |..(.STR | R11,[R|
|00004a60| 37 5d 2c 52 38 0d 19 32 | 10 4d 4f 56 20 20 20 50 |7],R8..2|.MOV P|
|00004a70| 43 2c 52 31 34 0d 19 3c | 0d 2e 63 65 6c 6c 64 65 |C,R14..<|..cellde|
|00004a80| 66 73 0d 19 46 0a 2e 62 | 6c 61 6e 6b 0d 19 50 12 |fs..F..b|lank..P.|
|00004a90| 45 51 55 44 20 26 39 39 | 39 39 39 39 39 39 0d 19 |EQUD &99|999999..|
|00004aa0| 5a 12 45 51 55 44 20 26 | 41 30 30 30 30 30 30 39 |Z.EQUD &|A0000009|
|00004ab0| 0d 19 64 12 45 51 55 44 | 20 26 41 30 30 30 30 30 |..d.EQUD| &A00000|
|00004ac0| 30 39 0d 19 6e 12 45 51 | 55 44 20 26 41 30 30 30 |09..n.EQ|UD &A000|
|00004ad0| 30 30 30 39 0d 19 78 12 | 45 51 55 44 20 26 41 30 |0009..x.|EQUD &A0|
|00004ae0| 30 30 30 30 30 39 0d 19 | 82 12 45 51 55 44 20 26 |000009..|..EQUD &|
|00004af0| 41 30 30 30 30 30 30 39 | 0d 19 8c 12 45 51 55 44 |A0000009|....EQUD|
|00004b00| 20 26 41 30 30 30 30 30 | 30 39 0d 19 96 12 45 51 | &A00000|09....EQ|
|00004b10| 55 44 20 26 41 41 41 41 | 41 41 41 39 0d 19 a0 08 |UD &AAAA|AAA9....|
|00004b20| 2e 6f 6e 65 0d 19 aa 12 | 45 51 55 44 20 26 39 39 |.one....|EQUD &99|
|00004b30| 39 39 39 39 39 39 0d 19 | b4 12 45 51 55 44 20 26 |999999..|..EQUD &|
|00004b40| 41 30 30 31 31 30 30 39 | 0d 19 be 12 45 51 55 44 |A0011009|....EQUD|
|00004b50| 20 26 41 30 30 31 31 31 | 30 39 0d 19 c8 12 45 51 | &A00111|09....EQ|
|00004b60| 55 44 20 26 41 30 30 31 | 31 30 30 39 0d 19 d2 12 |UD &A001|1009....|
|00004b70| 45 51 55 44 20 26 41 30 | 30 31 31 30 30 39 0d 19 |EQUD &A0|011009..|
|00004b80| dc 12 45 51 55 44 20 26 | 41 30 30 31 31 30 30 39 |..EQUD &|A0011009|
|00004b90| 0d 19 e6 12 45 51 55 44 | 20 26 41 30 31 31 31 31 |....EQUD| &A01111|
|00004ba0| 30 39 0d 19 f0 12 45 51 | 55 44 20 26 41 41 41 41 |09....EQ|UD &AAAA|
|00004bb0| 41 41 41 39 0d 19 fa 08 | 2e 74 77 6f 0d 1a 04 12 |AAA9....|.two....|
|00004bc0| 45 51 55 44 20 26 39 39 | 39 39 39 39 39 39 0d 1a |EQUD &99|999999..|
|00004bd0| 0e 12 45 51 55 44 20 26 | 41 30 32 32 32 32 30 39 |..EQUD &|A0222209|
|00004be0| 0d 1a 18 12 45 51 55 44 | 20 26 41 32 32 30 30 32 |....EQUD| &A22002|
|00004bf0| 32 39 0d 1a 22 12 45 51 | 55 44 20 26 41 32 32 30 |29..".EQ|UD &A220|
|00004c00| 30 30 30 39 0d 1a 2c 12 | 45 51 55 44 20 26 41 30 |0009..,.|EQUD &A0|
|00004c10| 32 32 30 30 30 39 0d 1a | 36 12 45 51 55 44 20 26 |220009..|6.EQUD &|
|00004c20| 41 30 30 32 32 30 30 39 | 0d 1a 40 12 45 51 55 44 |A0022009|..@.EQUD|
|00004c30| 20 26 41 32 32 32 32 32 | 32 39 0d 1a 4a 12 45 51 | &A22222|29..J.EQ|
|00004c40| 55 44 20 26 41 41 41 41 | 41 41 41 39 0d 1a 54 0a |UD &AAAA|AAA9..T.|
|00004c50| 2e 74 68 72 65 65 0d 1a | 5e 12 45 51 55 44 20 26 |.three..|^.EQUD &|
|00004c60| 39 39 39 39 39 39 39 39 | 0d 1a 68 12 45 51 55 44 |99999999|..h.EQUD|
|00004c70| 20 26 41 33 33 33 33 33 | 33 39 0d 1a 72 12 45 51 | &A33333|39..r.EQ|
|00004c80| 55 44 20 26 41 30 33 33 | 30 30 30 39 0d 1a 7c 12 |UD &A033|0009..|.|
|00004c90| 45 51 55 44 20 26 41 30 | 30 33 33 30 30 39 0d 1a |EQUD &A0|033009..|
|00004ca0| 86 12 45 51 55 44 20 26 | 41 30 33 33 30 30 30 39 |..EQUD &|A0330009|
|00004cb0| 0d 1a 90 12 45 51 55 44 | 20 26 41 33 33 30 30 33 |....EQUD| &A33003|
|00004cc0| 33 39 0d 1a 9a 12 45 51 | 55 44 20 26 41 30 33 33 |39....EQ|UD &A033|
|00004cd0| 33 33 30 39 0d 1a a4 12 | 45 51 55 44 20 26 41 41 |3309....|EQUD &AA|
|00004ce0| 41 41 41 41 41 39 0d 1a | ae 09 2e 66 6f 75 72 0d |AAAAA9..|...four.|
|00004cf0| 1a b8 12 45 51 55 44 20 | 26 39 39 39 39 39 39 39 |...EQUD |&9999999|
|00004d00| 39 0d 1a c2 12 45 51 55 | 44 20 26 41 30 34 34 30 |9....EQU|D &A0440|
|00004d10| 30 30 39 0d 1a cc 12 45 | 51 55 44 20 26 41 30 34 |009....E|QUD &A04|
|00004d20| 34 34 30 30 39 0d 1a d6 | 12 45 51 55 44 20 26 41 |44009...|.EQUD &A|
|00004d30| 30 34 34 34 34 30 39 0d | 1a e0 12 45 51 55 44 20 |0444409.|...EQUD |
|00004d40| 26 41 30 34 34 30 34 34 | 39 0d 1a ea 12 45 51 55 |&A044044|9....EQU|
|00004d50| 44 20 26 41 34 34 34 34 | 34 34 39 0d 1a f4 12 45 |D &A4444|449....E|
|00004d60| 51 55 44 20 26 41 30 34 | 34 30 30 30 39 0d 1a fe |QUD &A04|40009...|
|00004d70| 12 45 51 55 44 20 26 41 | 41 41 41 41 41 41 39 0d |.EQUD &A|AAAAAA9.|
|00004d80| 1b 08 09 2e 66 69 76 65 | 0d 1b 12 12 45 51 55 44 |....five|....EQUD|
|00004d90| 20 26 39 39 39 39 39 39 | 39 39 0d 1b 1c 12 45 51 | &999999|99....EQ|
|00004da0| 55 44 20 26 41 35 35 35 | 35 35 35 39 0d 1b 26 12 |UD &A555|5559..&.|
|00004db0| 45 51 55 44 20 26 41 30 | 30 30 30 35 35 39 0d 1b |EQUD &A0|000559..|
|00004dc0| 30 12 45 51 55 44 20 26 | 41 30 35 35 35 35 35 39 |0.EQUD &|A0555559|
|00004dd0| 0d 1b 3a 12 45 51 55 44 | 20 26 41 35 35 30 30 30 |..:.EQUD| &A55000|
|00004de0| 30 39 0d 1b 44 12 45 51 | 55 44 20 26 41 35 35 30 |09..D.EQ|UD &A550|
|00004df0| 30 35 35 39 0d 1b 4e 12 | 45 51 55 44 20 26 41 30 |0559..N.|EQUD &A0|
|00004e00| 35 35 35 35 30 39 0d 1b | 58 12 45 51 55 44 20 26 |555509..|X.EQUD &|
|00004e10| 41 41 41 41 41 41 41 39 | 0d 1b 62 08 2e 73 69 78 |AAAAAAA9|..b..six|
|00004e20| 0d 1b 6c 12 45 51 55 44 | 20 26 39 39 39 39 39 39 |..l.EQUD| &999999|
|00004e30| 39 39 0d 1b 76 12 45 51 | 55 44 20 26 41 30 36 36 |99..v.EQ|UD &A066|
|00004e40| 36 36 30 39 0d 1b 80 12 | 45 51 55 44 20 26 41 30 |6609....|EQUD &A0|
|00004e50| 30 30 30 36 36 39 0d 1b | 8a 12 45 51 55 44 20 26 |000669..|..EQUD &|
|00004e60| 41 30 36 36 36 36 36 39 | 0d 1b 94 12 45 51 55 44 |A0666669|....EQUD|
|00004e70| 20 26 41 36 36 30 30 36 | 36 39 0d 1b 9e 12 45 51 | &A66006|69....EQ|
|00004e80| 55 44 20 26 41 36 36 30 | 30 36 36 39 0d 1b a8 12 |UD &A660|0669....|
|00004e90| 45 51 55 44 20 26 41 30 | 36 36 36 36 30 39 0d 1b |EQUD &A0|666609..|
|00004ea0| b2 12 45 51 55 44 20 26 | 41 41 41 41 41 41 41 39 |..EQUD &|AAAAAAA9|
|00004eb0| 0d 1b bc 0a 2e 73 65 76 | 65 6e 0d 1b c6 12 45 51 |.....sev|en....EQ|
|00004ec0| 55 44 20 26 39 39 39 39 | 39 39 39 39 0d 1b d0 12 |UD &9999|9999....|
|00004ed0| 45 51 55 44 20 26 41 37 | 37 37 37 37 37 39 0d 1b |EQUD &A7|777779..|
|00004ee0| da 12 45 51 55 44 20 26 | 41 37 37 30 30 30 30 39 |..EQUD &|A7700009|
|00004ef0| 0d 1b e4 12 45 51 55 44 | 20 26 41 30 37 37 30 30 |....EQUD| &A07700|
|00004f00| 30 39 0d 1b ee 12 45 51 | 55 44 20 26 41 30 30 37 |09....EQ|UD &A007|
|00004f10| 37 30 30 39 0d 1b f8 12 | 45 51 55 44 20 26 41 30 |7009....|EQUD &A0|
|00004f20| 30 37 37 30 30 39 0d 1c | 02 12 45 51 55 44 20 26 |077009..|..EQUD &|
|00004f30| 41 30 30 37 37 30 30 39 | 0d 1c 0c 12 45 51 55 44 |A0077009|....EQUD|
|00004f40| 20 26 41 41 41 41 41 41 | 41 39 0d 1c 16 0a 2e 65 | &AAAAAA|A9.....e|
|00004f50| 69 67 68 74 0d 1c 20 12 | 45 51 55 44 20 26 39 39 |ight.. .|EQUD &99|
|00004f60| 39 39 39 39 39 39 0d 1c | 2a 12 45 51 55 44 20 26 |999999..|*.EQUD &|
|00004f70| 41 30 38 38 38 38 30 39 | 0d 1c 34 12 45 51 55 44 |A0888809|..4.EQUD|
|00004f80| 20 26 41 38 38 30 30 38 | 38 39 0d 1c 3e 12 45 51 | &A88008|89..>.EQ|
|00004f90| 55 44 20 26 41 30 38 38 | 38 38 30 39 0d 1c 48 12 |UD &A088|8809..H.|
|00004fa0| 45 51 55 44 20 26 41 38 | 38 30 30 38 38 39 0d 1c |EQUD &A8|800889..|
|00004fb0| 52 12 45 51 55 44 20 26 | 41 38 38 30 30 38 38 39 |R.EQUD &|A8800889|
|00004fc0| 0d 1c 5c 12 45 51 55 44 | 20 26 41 30 38 38 38 38 |..\.EQUD| &A08888|
|00004fd0| 30 39 0d 1c 66 12 45 51 | 55 44 20 26 41 41 41 41 |09..f.EQ|UD &AAAA|
|00004fe0| 41 41 41 39 0d 1c 70 0c | 2e 75 6e 6b 6e 6f 77 6e |AAA9..p.|.unknown|
|00004ff0| 0d 1c 7a 12 45 51 55 44 | 20 26 41 41 41 41 41 41 |..z.EQUD| &AAAAAA|
|00005000| 41 41 0d 1c 84 12 45 51 | 55 44 20 26 39 42 42 42 |AA....EQ|UD &9BBB|
|00005010| 42 42 42 41 0d 1c 8e 12 | 45 51 55 44 20 26 39 42 |BBBA....|EQUD &9B|
|00005020| 42 42 42 42 42 41 0d 1c | 98 12 45 51 55 44 20 26 |BBBBBA..|..EQUD &|
|00005030| 39 42 42 42 42 42 42 41 | 0d 1c a2 12 45 51 55 44 |9BBBBBBA|....EQUD|
|00005040| 20 26 39 42 42 42 42 42 | 42 41 0d 1c ac 12 45 51 | &9BBBBB|BA....EQ|
|00005050| 55 44 20 26 39 42 42 42 | 42 42 42 41 0d 1c b6 12 |UD &9BBB|BBBA....|
|00005060| 45 51 55 44 20 26 39 42 | 42 42 42 42 42 41 0d 1c |EQUD &9B|BBBBBA..|
|00005070| c0 12 45 51 55 44 20 26 | 39 39 39 39 39 39 39 39 |..EQUD &|99999999|
|00005080| 0d 1c ca 0c 2e 71 75 65 | 72 69 65 64 0d 1c d4 12 |.....que|ried....|
|00005090| 45 51 55 44 20 26 41 41 | 41 41 41 41 41 41 0d 1c |EQUD &AA|AAAAAA..|
|000050a0| de 12 45 51 55 44 20 26 | 39 42 43 43 43 43 42 41 |..EQUD &|9BCCCCBA|
|000050b0| 0d 1c e8 12 45 51 55 44 | 20 26 39 43 43 42 42 43 |....EQUD| &9CCBBC|
|000050c0| 43 41 0d 1c f2 12 45 51 | 55 44 20 26 39 42 43 43 |CA....EQ|UD &9BCC|
|000050d0| 42 42 42 41 0d 1c fc 12 | 45 51 55 44 20 26 39 42 |BBBA....|EQUD &9B|
|000050e0| 42 43 43 42 42 41 0d 1d | 06 12 45 51 55 44 20 26 |BCCBBA..|..EQUD &|
|000050f0| 39 42 42 42 42 42 42 41 | 0d 1d 10 12 45 51 55 44 |9BBBBBBA|....EQUD|
|00005100| 20 26 39 42 42 43 43 42 | 42 41 0d 1d 1a 12 45 51 | &9BBCCB|BA....EQ|
|00005110| 55 44 20 26 39 39 39 39 | 39 39 39 39 0d 1d 24 09 |UD &9999|9999..$.|
|00005120| 2e 6d 69 6e 65 0d 1d 2e | 12 45 51 55 44 20 26 41 |.mine...|.EQUD &A|
|00005130| 41 41 41 41 41 41 41 0d | 1d 38 12 45 51 55 44 20 |AAAAAAA.|.8.EQUD |
|00005140| 26 39 42 42 44 42 44 42 | 41 0d 1d 42 12 45 51 55 |&9BBDBDB|A..B.EQU|
|00005150| 44 20 26 39 44 42 44 44 | 42 42 41 0d 1d 4c 12 45 |D &9DBDD|BBA..L.E|
|00005160| 51 55 44 20 26 39 42 44 | 44 44 44 44 41 0d 1d 56 |QUD &9BD|DDDDA..V|
|00005170| 12 45 51 55 44 20 26 39 | 44 44 44 44 44 42 41 0d |.EQUD &9|DDDDDBA.|
|00005180| 1d 60 12 45 51 55 44 20 | 26 39 42 42 44 44 42 44 |.`.EQUD |&9BBDDBD|
|00005190| 41 0d 1d 6a 12 45 51 55 | 44 20 26 39 42 44 42 44 |A..j.EQU|D &9BDBD|
|000051a0| 42 42 41 0d 1d 74 12 45 | 51 55 44 20 26 39 39 39 |BBA..t.E|QUD &999|
|000051b0| 39 39 39 39 39 0d 1d 7e | 07 5d 3a ed 0d 1d 88 05 |99999..~|.]:.....|
|000051c0| e1 0d 1d 92 05 3a 0d 1d | 9c 35 dd 20 f2 73 74 6f |.....:..|.5. .sto|
|000051d0| 72 6d 28 67 72 69 64 25 | 2c 67 72 69 64 32 25 2c |rm(grid%|,grid2%,|
|000051e0| 6e 6f 5f 6f 66 5f 6d 69 | 6e 65 73 25 2c 78 73 69 |no_of_mi|nes%,xsi|
|000051f0| 7a 65 25 2c 79 73 69 7a | 65 25 29 0d 1d a6 41 f4 |ze%,ysiz|e%)...A.|
|00005200| 20 72 61 6e 64 6f 6d 6c | 79 20 6d 6f 76 65 20 6d | randoml|y move m|
|00005210| 69 6e 65 73 20 2d 20 69 | 6e 70 75 74 20 67 72 69 |ines - i|nput gri|
|00005220| 64 20 69 6e 20 67 72 69 | 64 25 2c 20 6f 75 74 70 |d in gri|d%, outp|
|00005230| 75 74 20 69 6e 20 67 72 | 69 64 32 25 0d 1d b0 23 |ut in gr|id2%...#|
|00005240| ea 20 78 63 6f 75 6e 74 | 25 2c 79 63 6f 75 6e 74 |. xcount|%,ycount|
|00005250| 25 2c 78 64 69 66 66 25 | 2c 79 64 69 66 66 25 0d |%,xdiff%|,ydiff%.|
|00005260| 1d ba 59 41 25 3d 67 72 | 69 64 25 3a 42 25 3d 28 |..YA%=gr|id%:B%=(|
|00005270| 78 73 69 7a 65 25 2b 32 | 29 2a 28 79 73 69 7a 65 |xsize%+2|)*(ysize|
|00005280| 25 2b 32 29 3a 43 25 3d | 67 72 69 64 32 25 3a 44 |%+2):C%=|grid2%:D|
|00005290| 25 3d 31 3a d6 20 63 6f | 70 79 63 6c 65 61 72 69 |%=1:. co|pycleari|
|000052a0| 6e 67 3a f4 20 63 6f 70 | 79 20 63 6c 65 61 72 69 |ng:. cop|y cleari|
|000052b0| 6e 67 20 6d 69 6e 65 73 | 0d 1d c4 1c 42 25 3d 78 |ng mines|....B%=x|
|000052c0| 73 69 7a 65 25 3a 43 25 | 3d 79 73 69 7a 65 25 3a |size%:C%|=ysize%:|
|000052d0| 44 25 3d 31 0d 1d ce 10 | d6 73 65 74 62 6f 75 6e |D%=1....|.setboun|
|000052e0| 64 61 72 79 0d 1d d8 25 | f4 20 70 75 74 20 6d 69 |dary...%|. put mi|
|000052f0| 6e 65 73 20 69 6e 20 61 | 6c 6c 20 74 68 65 20 65 |nes in a|ll the e|
|00005300| 64 67 65 20 63 65 6c 6c | 73 0d 1d e2 18 e3 20 79 |dge cell|s..... y|
|00005310| 63 6f 75 6e 74 25 3d 31 | 20 b8 20 79 73 69 7a 65 |count%=1| . ysize|
|00005320| 25 0d 1d ec 1a 20 20 e3 | 20 78 63 6f 75 6e 74 25 |%.... .| xcount%|
|00005330| 3d 31 20 b8 20 78 73 69 | 7a 65 25 0d 1d f6 32 20 |=1 . xsi|ze%...2 |
|00005340| 20 20 20 e7 20 67 72 69 | 64 25 3f 28 78 63 6f 75 | . gri|d%?(xcou|
|00005350| 6e 74 25 2b 28 78 73 69 | 7a 65 25 2b 32 29 2a 79 |nt%+(xsi|ze%+2)*y|
|00005360| 63 6f 75 6e 74 25 29 20 | 80 20 31 20 8c 0d 1e 00 |count%) |. 1 ....|
|00005370| 6e 20 20 20 20 20 20 20 | 67 72 69 64 25 3f 28 78 |n |grid%?(x|
|00005380| 63 6f 75 6e 74 25 2b 28 | 78 73 69 7a 65 25 2b 32 |count%+(|xsize%+2|
|00005390| 29 2a 79 63 6f 75 6e 74 | 25 29 3d 67 72 69 64 25 |)*ycount|%)=grid%|
|000053a0| 3f 28 78 63 6f 75 6e 74 | 25 2b 28 78 73 69 7a 65 |?(xcount|%+(xsize|
|000053b0| 25 2b 32 29 2a 79 63 6f | 75 6e 74 25 29 20 80 20 |%+2)*yco|unt%) . |
|000053c0| 28 ac 20 31 29 3a f4 20 | 42 49 43 20 31 20 2d 20 |(. 1):. |BIC 1 - |
|000053d0| 72 65 6d 6f 76 65 20 6d | 69 6e 65 0d 1e 0a 0b 20 |remove m|ine.... |
|000053e0| 20 20 20 20 20 f5 0d 1e | 14 27 20 20 20 20 20 20 | ...|.' |
|000053f0| 20 20 78 64 69 66 66 25 | 3d b3 28 33 29 2d 32 3a | xdiff%|=.(3)-2:|
|00005400| 79 64 69 66 66 25 3d b3 | 28 33 29 2d 32 0d 1e 1e |ydiff%=.|(3)-2...|
|00005410| 85 20 20 20 20 20 20 20 | fd 20 28 67 72 69 64 25 |. |. (grid%|
|00005420| 3f 28 78 63 6f 75 6e 74 | 25 2b 78 64 69 66 66 25 |?(xcount|%+xdiff%|
|00005430| 2b 28 78 73 69 7a 65 25 | 2b 32 29 2a 28 79 63 6f |+(xsize%|+2)*(yco|
|00005440| 75 6e 74 25 2b 79 64 69 | 66 66 25 29 29 20 80 20 |unt%+ydi|ff%)) . |
|00005450| 31 29 3d 30 20 80 20 28 | 67 72 69 64 32 25 3f 28 |1)=0 . (|grid2%?(|
|00005460| 78 63 6f 75 6e 74 25 2b | 78 64 69 66 66 25 2b 28 |xcount%+|xdiff%+(|
|00005470| 78 73 69 7a 65 25 2b 32 | 29 2a 28 79 63 6f 75 6e |xsize%+2|)*(ycoun|
|00005480| 74 25 2b 79 64 69 66 66 | 25 29 29 20 80 20 31 29 |t%+ydiff|%)) . 1)|
|00005490| 3d 30 0d 1e 28 75 20 20 | 20 20 20 20 67 72 69 64 |=0..(u | grid|
|000054a0| 32 25 3f 28 78 63 6f 75 | 6e 74 25 2b 78 64 69 66 |2%?(xcou|nt%+xdif|
|000054b0| 66 25 2b 28 78 73 69 7a | 65 25 2b 32 29 2a 28 79 |f%+(xsiz|e%+2)*(y|
|000054c0| 63 6f 75 6e 74 25 2b 79 | 64 69 66 66 25 29 29 3d |count%+y|diff%))=|
|000054d0| 67 72 69 64 32 25 3f 28 | 78 63 6f 75 6e 74 25 2b |grid2%?(|xcount%+|
|000054e0| 78 64 69 66 66 25 2b 28 | 78 73 69 7a 65 25 2b 32 |xdiff%+(|xsize%+2|
|000054f0| 29 2a 28 79 63 6f 75 6e | 74 25 2b 79 64 69 66 66 |)*(ycoun|t%+ydiff|
|00005500| 25 29 29 20 84 20 31 0d | 1e 32 0a 20 20 20 20 20 |%)) . 1.|.2. |
|00005510| cd 0d 1e 3c 08 20 20 20 | ed 0d 1e 46 06 20 ed 0d |...<. |...F. ..|
|00005520| 1e 50 39 41 25 3d 67 72 | 69 64 32 25 3a 42 25 3d |.P9A%=gr|id2%:B%=|
|00005530| 28 78 73 69 7a 65 25 2b | 32 29 2a 28 79 73 69 7a |(xsize%+|2)*(ysiz|
|00005540| 65 25 2b 32 29 3a 43 25 | 3d 67 72 69 64 25 3a d6 |e%+2):C%|=grid%:.|
|00005550| 63 6f 70 79 67 72 69 64 | 0d 1e 5a 25 41 25 3d 67 |copygrid|..Z%A%=g|
|00005560| 72 69 64 25 3a 42 25 3d | 78 73 69 7a 65 25 3a 43 |rid%:B%=|xsize%:C|
|00005570| 25 3d 79 73 69 7a 65 25 | 3a 44 25 3d 30 0d 1e 64 |%=ysize%|:D%=0..d|
|00005580| 10 d6 73 65 74 62 6f 75 | 6e 64 61 72 79 0d 1e 6e |..setbou|ndary..n|
|00005590| 12 d6 6d 69 6e 65 61 64 | 6a 61 63 65 6e 63 79 0d |..minead|jacency.|
|000055a0| 1e 78 05 e1 0d 1e 82 05 | 3a 0d 1e 8c 11 dd 20 f2 |.x......|:..... .|
|000055b0| 73 65 74 70 61 6c 65 74 | 74 65 0d 1e 96 19 fb 20 |setpalet|te..... |
|000055c0| 30 2c 30 2c 36 34 2c 34 | 38 3a f4 20 43 6c 65 61 |0,0,64,4|8:. Clea|
|000055d0| 72 65 64 0d 1e a0 1a f4 | 20 6e 75 6d 62 65 72 20 |red.....| number |
|000055e0| 63 6f 6c 6f 75 72 73 20 | 28 31 2d 38 29 0d 1e aa |colours |(1-8)...|
|000055f0| 0f fb 20 31 2c 32 32 34 | 2c 30 2c 30 0d 1e b4 11 |.. 1,224|,0,0....|
|00005600| fb 20 32 2c 32 31 32 2c | 31 32 38 2c 30 0d 1e be |. 2,212,|128,0...|
|00005610| 11 fb 20 33 2c 31 39 32 | 2c 31 39 32 2c 30 0d 1e |.. 3,192|,192,0..|
|00005620| c8 0f fb 20 34 2c 30 2c | 31 39 32 2c 30 0d 1e d2 |... 4,0,|192,0...|
|00005630| 11 fb 20 35 2c 30 2c 31 | 36 30 2c 32 31 32 0d 1e |.. 5,0,1|60,212..|
|00005640| dc 0f fb 20 36 2c 30 2c | 30 2c 32 35 35 0d 1e e6 |... 6,0,|0,255...|
|00005650| 11 fb 20 37 2c 31 36 30 | 2c 30 2c 32 31 32 0d 1e |.. 7,160|,0,212..|
|00005660| f0 11 fb 20 38 2c 31 39 | 32 2c 30 2c 31 36 30 0d |... 8,19|2,0,160.|
|00005670| 1e fa 0f fb 20 39 2c 30 | 2c 33 32 2c 34 38 0d 1f |.... 9,0|,32,48..|
|00005680| 04 23 fb 31 30 2c 30 2c | 38 30 2c 39 36 3a f4 20 |.#.10,0,|80,96:. |
|00005690| 55 6e 6b 6e 6f 77 6e 2c | 20 6c 69 74 20 73 69 64 |Unknown,| lit sid|
|000056a0| 65 0d 1f 0e 19 fb 31 31 | 2c 30 2c 36 34 2c 39 36 |e.....11|,0,64,96|
|000056b0| 3a f4 20 55 6e 6b 6e 6f | 77 6e 0d 1f 18 1c fb 31 |:. Unkno|wn.....1|
|000056c0| 32 2c 36 34 2c 31 36 30 | 2c 31 39 32 3a f4 20 51 |2,64,160|,192:. Q|
|000056d0| 75 65 72 69 65 64 0d 1f | 22 1f fb 31 33 2c 30 2c |ueried..|"..13,0,|
|000056e0| 30 2c 30 3a f4 20 4d 49 | 4e 45 2f 62 61 63 6b 67 |0,0:. MI|NE/backg|
|000056f0| 72 6f 75 6e 64 0d 1f 2c | 20 fb 31 34 2c 31 39 32 |round..,| .14,192|
|00005700| 2c 31 39 32 2c 31 39 32 | 3a f4 20 57 68 69 74 65 |,192,192|:. White|
|00005710| 20 74 65 78 74 0d 1f 36 | 05 e1 0d 1f 40 05 3a 0d | text..6|....@.:.|
|00005720| 1f 4a 12 dd 20 f2 66 61 | 64 65 74 6f 62 6c 61 63 |.J.. .fa|detoblac|
|00005730| 6b 0d 1f 54 1c ea 20 74 | 69 6d 65 25 2c 74 6f 74 |k..T.. t|ime%,tot|
|00005740| 61 6c 74 69 6d 65 25 2c | 76 61 6c 75 65 0d 1f 5e |altime%,|value..^|
|00005750| 12 74 6f 74 61 6c 74 69 | 6d 65 25 3d 31 30 30 0d |.totalti|me%=100.|
|00005760| 1f 68 0b 74 69 6d 65 25 | 3d 91 0d 1f 72 05 f5 0d |.h.time%|=...r...|
|00005770| 1f 7c 08 20 20 c8 96 0d | 1f 86 2d 20 20 76 61 6c |.|. ...|..- val|
|00005780| 75 65 3d 28 74 6f 74 61 | 6c 74 69 6d 65 25 2d 28 |ue=(tota|ltime%-(|
|00005790| 91 2d 74 69 6d 65 25 29 | 29 2f 74 6f 74 61 6c 74 |.-time%)|)/totalt|
|000057a0| 69 6d 65 25 0d 1f 90 17 | 20 20 e7 20 76 61 6c 75 |ime%....| . valu|
|000057b0| 65 3c 30 20 76 61 6c 75 | 65 3d 30 0d 1f 9a 17 20 |e<0 valu|e=0.... |
|000057c0| 20 e7 20 76 61 6c 75 65 | 3e 31 20 76 61 6c 75 65 | . value|>1 value|
|000057d0| 3d 31 0d 1f a4 27 20 20 | fb 20 30 2c 30 2c 36 34 |=1...' |. 0,0,64|
|000057e0| 2a 76 61 6c 75 65 2c 34 | 38 2a 76 61 6c 75 65 3a |*value,4|8*value:|
|000057f0| f4 20 43 6c 65 61 72 65 | 64 0d 1f ae 1c 20 20 f4 |. Cleare|d.... .|
|00005800| 20 6e 75 6d 62 65 72 20 | 63 6f 6c 6f 75 72 73 20 | number |colours |
|00005810| 28 31 2d 38 29 0d 1f b8 | 17 20 20 fb 20 31 2c 32 |(1-8)...|. . 1,2|
|00005820| 32 34 2a 76 61 6c 75 65 | 2c 30 2c 30 0d 1f c2 1f |24*value|,0,0....|
|00005830| 20 20 fb 20 32 2c 32 31 | 32 2a 76 61 6c 75 65 2c | . 2,21|2*value,|
|00005840| 31 32 38 2a 76 61 6c 75 | 65 2c 30 0d 1f cc 1f 20 |128*valu|e,0.... |
|00005850| 20 fb 20 33 2c 31 39 32 | 2a 76 61 6c 75 65 2c 31 | . 3,192|*value,1|
|00005860| 39 32 2a 76 61 6c 75 65 | 2c 30 0d 1f d6 17 20 20 |92*value|,0.... |
|00005870| fb 20 34 2c 30 2c 31 39 | 32 2a 76 61 6c 75 65 2c |. 4,0,19|2*value,|
|00005880| 30 0d 1f e0 1f 20 20 fb | 20 35 2c 30 2c 31 36 30 |0.... .| 5,0,160|
|00005890| 2a 76 61 6c 75 65 2c 32 | 31 32 2a 76 61 6c 75 65 |*value,2|12*value|
|000058a0| 0d 1f ea 17 20 20 fb 20 | 36 2c 30 2c 30 2c 32 35 |.... . |6,0,0,25|
|000058b0| 35 2a 76 61 6c 75 65 0d | 1f f4 1f 20 20 fb 20 37 |5*value.|... . 7|
|000058c0| 2c 31 36 30 2a 76 61 6c | 75 65 2c 30 2c 32 31 32 |,160*val|ue,0,212|
|000058d0| 2a 76 61 6c 75 65 0d 1f | fe 1f 20 20 fb 20 38 2c |*value..|.. . 8,|
|000058e0| 31 39 32 2a 76 61 6c 75 | 65 2c 30 2c 31 36 30 2a |192*valu|e,0,160*|
|000058f0| 76 61 6c 75 65 0d 20 08 | 1d 20 20 fb 20 39 2c 30 |value. .|. . 9,0|
|00005900| 2c 33 32 2a 76 61 6c 75 | 65 2c 34 38 2a 76 61 6c |,32*valu|e,48*val|
|00005910| 75 65 0d 20 12 31 20 20 | fb 31 30 2c 30 2c 38 30 |ue. .1 |.10,0,80|
|00005920| 2a 76 61 6c 75 65 2c 39 | 36 2a 76 61 6c 75 65 3a |*value,9|6*value:|
|00005930| f4 20 55 6e 6b 6e 6f 77 | 6e 2c 20 6c 69 74 20 73 |. Unknow|n, lit s|
|00005940| 69 64 65 0d 20 1c 27 20 | 20 fb 31 31 2c 30 2c 36 |ide. .' | .11,0,6|
|00005950| 34 2a 76 61 6c 75 65 2c | 39 36 2a 76 61 6c 75 65 |4*value,|96*value|
|00005960| 3a f4 20 55 6e 6b 6e 6f | 77 6e 0d 20 26 30 20 20 |:. Unkno|wn. &0 |
|00005970| fb 31 32 2c 36 34 2a 76 | 61 6c 75 65 2c 31 36 30 |.12,64*v|alue,160|
|00005980| 2a 76 61 6c 75 65 2c 31 | 39 32 2a 76 61 6c 75 65 |*value,1|92*value|
|00005990| 3a f4 20 51 75 65 72 69 | 65 64 0d 20 30 21 20 20 |:. Queri|ed. 0! |
|000059a0| fb 31 33 2c 30 2c 30 2c | 30 3a f4 20 4d 49 4e 45 |.13,0,0,|0:. MINE|
|000059b0| 2f 62 61 63 6b 67 72 6f | 75 6e 64 0d 20 3a 34 20 |/backgro|und. :4 |
|000059c0| 20 fb 31 34 2c 31 39 32 | 2a 76 61 6c 75 65 2c 31 | .14,192|*value,1|
|000059d0| 39 32 2a 76 61 6c 75 65 | 2c 31 39 32 2a 76 61 6c |92*value|,192*val|
|000059e0| 75 65 3a f4 20 57 68 69 | 74 65 20 74 65 78 74 0d |ue:. Whi|te text.|
|000059f0| 20 44 1c 20 fd 20 28 91 | 2d 74 69 6d 65 25 3e 3d | D. . (.|-time%>=|
|00005a00| 74 6f 74 61 6c 74 69 6d | 65 25 29 0d 20 4e 05 e1 |totaltim|e%). N..|
|00005a10| 0d 20 58 05 3a 0d 20 62 | 11 dd 20 f2 66 61 64 65 |. X.:. b|.. .fade|
|00005a20| 62 61 63 6b 69 6e 0d 20 | 6c 1c ea 20 74 69 6d 65 |backin. |l.. time|
|00005a30| 25 2c 74 6f 74 61 6c 74 | 69 6d 65 25 2c 76 61 6c |%,totalt|ime%,val|
|00005a40| 75 65 0d 20 76 12 74 6f | 74 61 6c 74 69 6d 65 25 |ue. v.to|taltime%|
|00005a50| 3d 31 30 30 0d 20 80 0b | 74 69 6d 65 25 3d 91 0d |=100. ..|time%=..|
|00005a60| 20 8a 05 f5 0d 20 94 08 | 20 20 c8 96 0d 20 9e 20 | .... ..| ... . |
|00005a70| 20 20 76 61 6c 75 65 3d | 28 91 2d 74 69 6d 65 25 | value=|(.-time%|
|00005a80| 29 2f 74 6f 74 61 6c 74 | 69 6d 65 25 0d 20 a8 17 |)/totalt|ime%. ..|
|00005a90| 20 20 e7 20 76 61 6c 75 | 65 3c 30 20 76 61 6c 75 | . valu|e<0 valu|
|00005aa0| 65 3d 30 0d 20 b2 17 20 | 20 e7 20 76 61 6c 75 65 |e=0. .. | . value|
|00005ab0| 3e 31 20 76 61 6c 75 65 | 3d 31 0d 20 bc 27 20 20 |>1 value|=1. .' |
|00005ac0| fb 20 30 2c 30 2c 36 34 | 2a 76 61 6c 75 65 2c 34 |. 0,0,64|*value,4|
|00005ad0| 38 2a 76 61 6c 75 65 3a | f4 20 43 6c 65 61 72 65 |8*value:|. Cleare|
|00005ae0| 64 0d 20 c6 1c 20 20 f4 | 20 6e 75 6d 62 65 72 20 |d. .. .| number |
|00005af0| 63 6f 6c 6f 75 72 73 20 | 28 31 2d 38 29 0d 20 d0 |colours |(1-8). .|
|00005b00| 17 20 20 fb 20 31 2c 32 | 32 34 2a 76 61 6c 75 65 |. . 1,2|24*value|
|00005b10| 2c 30 2c 30 0d 20 da 1f | 20 20 fb 20 32 2c 32 31 |,0,0. ..| . 2,21|
|00005b20| 32 2a 76 61 6c 75 65 2c | 31 32 38 2a 76 61 6c 75 |2*value,|128*valu|
|00005b30| 65 2c 30 0d 20 e4 1f 20 | 20 fb 20 33 2c 31 39 32 |e,0. .. | . 3,192|
|00005b40| 2a 76 61 6c 75 65 2c 31 | 39 32 2a 76 61 6c 75 65 |*value,1|92*value|
|00005b50| 2c 30 0d 20 ee 17 20 20 | fb 20 34 2c 30 2c 31 39 |,0. .. |. 4,0,19|
|00005b60| 32 2a 76 61 6c 75 65 2c | 30 0d 20 f8 1f 20 20 fb |2*value,|0. .. .|
|00005b70| 20 35 2c 30 2c 31 36 30 | 2a 76 61 6c 75 65 2c 32 | 5,0,160|*value,2|
|00005b80| 31 32 2a 76 61 6c 75 65 | 0d 21 02 17 20 20 fb 20 |12*value|.!.. . |
|00005b90| 36 2c 30 2c 30 2c 32 35 | 35 2a 76 61 6c 75 65 0d |6,0,0,25|5*value.|
|00005ba0| 21 0c 1f 20 20 fb 20 37 | 2c 31 36 30 2a 76 61 6c |!.. . 7|,160*val|
|00005bb0| 75 65 2c 30 2c 32 31 32 | 2a 76 61 6c 75 65 0d 21 |ue,0,212|*value.!|
|00005bc0| 16 1f 20 20 fb 20 38 2c | 31 39 32 2a 76 61 6c 75 |.. . 8,|192*valu|
|00005bd0| 65 2c 30 2c 31 36 30 2a | 76 61 6c 75 65 0d 21 20 |e,0,160*|value.! |
|00005be0| 1d 20 20 fb 20 39 2c 30 | 2c 33 32 2a 76 61 6c 75 |. . 9,0|,32*valu|
|00005bf0| 65 2c 34 38 2a 76 61 6c | 75 65 0d 21 2a 31 20 20 |e,48*val|ue.!*1 |
|00005c00| fb 31 30 2c 30 2c 38 30 | 2a 76 61 6c 75 65 2c 39 |.10,0,80|*value,9|
|00005c10| 36 2a 76 61 6c 75 65 3a | f4 20 55 6e 6b 6e 6f 77 |6*value:|. Unknow|
|00005c20| 6e 2c 20 6c 69 74 20 73 | 69 64 65 0d 21 34 27 20 |n, lit s|ide.!4' |
|00005c30| 20 fb 31 31 2c 30 2c 36 | 34 2a 76 61 6c 75 65 2c | .11,0,6|4*value,|
|00005c40| 39 36 2a 76 61 6c 75 65 | 3a f4 20 55 6e 6b 6e 6f |96*value|:. Unkno|
|00005c50| 77 6e 0d 21 3e 30 20 20 | fb 31 32 2c 36 34 2a 76 |wn.!>0 |.12,64*v|
|00005c60| 61 6c 75 65 2c 31 36 30 | 2a 76 61 6c 75 65 2c 31 |alue,160|*value,1|
|00005c70| 39 32 2a 76 61 6c 75 65 | 3a f4 20 51 75 65 72 69 |92*value|:. Queri|
|00005c80| 65 64 0d 21 48 21 20 20 | fb 31 33 2c 30 2c 30 2c |ed.!H! |.13,0,0,|
|00005c90| 30 3a f4 20 4d 49 4e 45 | 2f 62 61 63 6b 67 72 6f |0:. MINE|/backgro|
|00005ca0| 75 6e 64 0d 21 52 34 20 | 20 fb 31 34 2c 31 39 32 |und.!R4 | .14,192|
|00005cb0| 2a 76 61 6c 75 65 2c 31 | 39 32 2a 76 61 6c 75 65 |*value,1|92*value|
|00005cc0| 2c 31 39 32 2a 76 61 6c | 75 65 3a f4 20 57 68 69 |,192*val|ue:. Whi|
|00005cd0| 74 65 20 74 65 78 74 0d | 21 5c 1c 20 fd 20 28 91 |te text.|!\. . (.|
|00005ce0| 2d 74 69 6d 65 25 3e 3d | 74 6f 74 61 6c 74 69 6d |-time%>=|totaltim|
|00005cf0| 65 25 29 0d 21 66 05 e1 | 0d 21 70 05 3a 0d 21 7a |e%).!f..|.!p.:.!z|
|00005d00| 10 dd 20 f2 6c 69 67 68 | 74 6e 69 6e 67 0d 21 84 |.. .ligh|tning.!.|
|00005d10| 14 ea 20 73 74 72 69 6b | 65 25 2c 70 61 75 73 65 |.. strik|e%,pause|
|00005d20| 25 0d 21 8e 13 70 61 75 | 73 65 25 3d a6 28 b3 28 |%.!..pau|se%=.(.(|
|00005d30| 38 30 29 29 0d 21 98 18 | e3 20 73 74 72 69 6b 65 |80)).!..|. strike|
|00005d40| 25 3d 31 20 b8 20 b3 28 | 33 29 2b 31 0d 21 a2 0c |%=1 . .(|3)+1.!..|
|00005d50| 20 20 f2 66 6c 61 73 68 | 0d 21 ac 15 20 20 70 61 | .flash|.!.. pa|
|00005d60| 75 73 65 25 3d a6 28 b3 | 28 38 30 29 29 0d 21 b6 |use%=.(.|(80)).!.|
|00005d70| 06 20 ed 0d 21 c0 05 e1 | 0d 21 ca 05 3a 0d 21 d4 |. ..!...|.!..:.!.|
|00005d80| 0c dd 20 f2 66 6c 61 73 | 68 0d 21 de 0f ea 20 63 |.. .flas|h.!... c|
|00005d90| 6f 6c 25 2c 63 6f 6c 24 | 0d 21 e8 0b 63 6f 6c 24 |ol%,col$|.!..col$|
|00005da0| 3d 22 22 0d 21 f2 0e e3 | 63 6f 6c 25 3d 30 b8 31 |="".!...|col%=0.1|
|00005db0| 35 0d 21 fc 32 63 6f 6c | 24 2b 3d bd 28 31 39 29 |5.!.2col|$+=.(19)|
|00005dc0| 2b bd 28 63 6f 6c 25 29 | 2b bd 28 31 36 29 2b bd |+.(col%)|+.(16)+.|
|00005dd0| 28 32 35 35 29 2b bd 28 | 32 35 35 29 2b bd 28 32 |(255)+.(|255)+.(2|
|00005de0| 35 35 29 0d 22 06 05 ed | 0d 22 10 06 c8 96 0d 22 |55)."...|."....."|
|00005df0| 1a 0a f1 63 6f 6c 24 3b | 0d 22 24 0b 63 6f 6c 24 |...col$;|."$.col$|
|00005e00| 3d 22 22 0d 22 2e 0e e3 | 63 6f 6c 25 3d 30 b8 31 |=""."...|col%=0.1|
|00005e10| 35 0d 22 38 2c 63 6f 6c | 24 2b 3d bd 28 31 39 29 |5."8,col|$+=.(19)|
|00005e20| 2b bd 28 63 6f 6c 25 29 | 2b bd 28 31 36 29 2b bd |+.(col%)|+.(16)+.|
|00005e30| 28 30 29 2b bd 28 30 29 | 2b bd 28 30 29 0d 22 42 |(0)+.(0)|+.(0)."B|
|00005e40| 05 ed 0d 22 4c 06 c8 96 | 0d 22 56 0a f1 63 6f 6c |..."L...|."V..col|
|00005e50| 24 3b 0d 22 60 05 e1 0d | 22 6a 05 3a 0d 22 74 13 |$;."`...|"j.:."t.|
|00005e60| dd 20 f2 72 65 64 72 61 | 77 73 63 72 65 65 6e 0d |. .redra|wscreen.|
|00005e70| 22 7e 2c 41 25 3d 67 72 | 69 64 25 3a 42 25 3d 67 |"~,A%=gr|id%:B%=g|
|00005e80| 72 69 64 73 69 7a 65 25 | 3a 43 25 3d 67 72 69 64 |ridsize%|:C%=grid|
|00005e90| 25 3a 44 25 3d 25 30 31 | 30 30 30 0d 22 88 10 d6 |%:D%=%01|000."...|
|00005ea0| 63 6f 70 79 73 65 74 74 | 69 6e 67 0d 22 92 0d 42 |copysett|ing."..B|
|00005eb0| 25 3d 78 73 69 7a 65 25 | 0d 22 9c 0d 43 25 3d 79 |%=xsize%|."..C%=y|
|00005ec0| 73 69 7a 65 25 0d 22 a6 | 11 d6 75 70 64 61 74 65 |size%.".|..update|
|00005ed0| 73 63 72 65 65 6e 0d 22 | b0 51 f2 70 72 69 6e 74 |screen."|.Q.print|
|00005ee0| 63 65 6e 74 72 65 64 28 | 22 4d 69 6e 65 73 20 6c |centred(|"Mines l|
|00005ef0| 65 66 74 3a 22 2b c3 28 | 6e 6f 5f 6f 66 5f 6d 69 |eft:"+.(|no_of_mi|
|00005f00| 6e 65 73 25 29 2c 32 2b | 28 76 64 75 76 61 72 69 |nes%),2+|(vduvari|
|00005f10| 61 62 6c 65 6c 69 73 74 | 21 31 36 2b 79 73 69 7a |ablelist|!16+ysiz|
|00005f20| 65 25 29 3e 3e 31 29 0d | 22 ba 0a f2 74 69 74 6c |e%)>>1).|"...titl|
|00005f30| 65 0d 22 c4 05 e1 0d 22 | ce 05 3a 0d 22 d8 11 dd |e."...."|..:."...|
|00005f40| 20 f2 63 65 6e 74 72 65 | 67 72 69 64 0d 22 e2 11 | .centre|grid."..|
|00005f50| ea 20 78 6f 66 66 25 2c | 79 6f 66 66 25 0d 22 ec |. xoff%,|yoff%.".|
|00005f60| 48 78 6f 66 66 25 3d 28 | 28 28 76 64 75 76 61 72 |Hxoff%=(|((vduvar|
|00005f70| 69 61 62 6c 65 6c 69 73 | 74 21 31 32 2b 31 29 2d |iablelis|t!12+1)-|
|00005f80| 78 73 69 7a 65 25 29 3e | 3e 31 29 3c 3c 32 3a f4 |xsize%)>|>1)<<2:.|
|00005f90| 20 6d 75 73 74 20 62 65 | 20 77 6f 72 64 20 61 6c | must be| word al|
|00005fa0| 69 67 6e 65 64 0d 22 f6 | 38 79 6f 66 66 25 3d 28 |igned.".|8yoff%=(|
|00005fb0| 28 28 76 64 75 76 61 72 | 69 61 62 6c 65 6c 69 73 |((vduvar|iablelis|
|00005fc0| 74 21 31 36 2b 31 29 2d | 79 73 69 7a 65 25 29 3e |t!16+1)-|ysize%)>|
|00005fd0| 3e 31 29 3c 3c 33 3a f4 | 2f 32 2c 2a 38 0d 23 00 |>1)<<3:.|/2,*8.#.|
|00005fe0| 47 21 76 64 75 76 61 72 | 69 61 62 6c 65 6c 69 73 |G!vduvar|iablelis|
|00005ff0| 74 3d 21 76 64 75 76 61 | 72 69 61 62 6c 65 6c 69 |t=!vduva|riableli|
|00006000| 73 74 2b 28 78 6f 66 66 | 25 2b 79 6f 66 66 25 2a |st+(xoff|%+yoff%*|
|00006010| 28 76 64 75 76 61 72 69 | 61 62 6c 65 6c 69 73 74 |(vduvari|ablelist|
|00006020| 21 34 29 29 0d 23 0a 05 | e1 0d 23 14 05 3a 0d 23 |!4)).#..|..#..:.#|
|00006030| 1e 1f dd 20 f2 70 72 69 | 6e 74 63 65 6e 74 72 65 |... .pri|ntcentre|
|00006040| 64 28 74 65 78 74 24 2c | 72 6f 77 25 29 0d 23 28 |d(text$,|row%).#(|
|00006050| 07 fb 31 34 0d 23 32 23 | e7 20 a9 28 74 65 78 74 |..14.#2#|. .(text|
|00006060| 24 29 3e 76 64 75 76 61 | 72 69 61 62 6c 65 6c 69 |$)>vduva|riableli|
|00006070| 73 74 21 31 32 20 8c 0d | 23 3c 15 20 20 f1 8a 30 |st!12 ..|#<. ..0|
|00006080| 2c 72 6f 77 25 29 3b 74 | 65 78 74 24 0d 23 46 06 |,row%);t|ext$.#F.|
|00006090| 20 cc 0d 23 50 2a 20 20 | f1 8a 30 2c 72 6f 77 25 | ..#P* |..0,row%|
|000060a0| 29 3b c4 31 2b 76 64 75 | 76 61 72 69 61 62 6c 65 |);.1+vdu|variable|
|000060b0| 6c 69 73 74 21 31 32 2c | 22 20 22 29 0d 23 5a 40 |list!12,|" ").#Z@|
|000060c0| 20 20 f1 8a 30 2c 72 6f | 77 25 29 3b c4 31 2b 28 | ..0,ro|w%);.1+(|
|000060d0| 28 76 64 75 76 61 72 69 | 61 62 6c 65 6c 69 73 74 |(vduvari|ablelist|
|000060e0| 21 31 32 2d a9 28 74 65 | 78 74 24 29 29 3e 3e 31 |!12-.(te|xt$))>>1|
|000060f0| 29 2c 22 20 22 29 3b 74 | 65 78 74 24 0d 23 64 06 |)," ");t|ext$.#d.|
|00006100| 20 cd 0d 23 6e 05 e1 0d | 23 78 05 3a 0d 23 82 0a | ..#n...|#x.:.#..|
|00006110| dd 20 f2 77 6f 6e 0d 23 | 8c 26 ea 20 63 78 25 2c |. .won.#|.&. cx%,|
|00006120| 63 79 25 2c 63 6f 6c 25 | 2c 77 6f 6e 74 69 6d 65 |cy%,col%|,wontime|
|00006130| 25 2c 74 6f 74 61 6c 74 | 69 6d 65 25 0d 23 96 12 |%,totalt|ime%.#..|
|00006140| 74 6f 74 61 6c 74 69 6d | 65 25 3d 31 30 30 0d 23 |totaltim|e%=100.#|
|00006150| a0 36 63 78 25 3d 28 31 | 2b 76 64 75 76 61 72 69 |.6cx%=(1|+vduvari|
|00006160| 61 62 6c 65 6c 69 73 74 | 21 31 32 29 3c 3c 28 32 |ablelist|!12)<<(2|
|00006170| 2b 76 64 75 76 61 72 69 | 61 62 6c 65 6c 69 73 74 |+vduvari|ablelist|
|00006180| 21 32 30 29 0d 23 aa 36 | 63 79 25 3d 28 31 2b 76 |!20).#.6|cy%=(1+v|
|00006190| 64 75 76 61 72 69 61 62 | 6c 65 6c 69 73 74 21 31 |duvariab|lelist!1|
|000061a0| 36 29 3c 3c 28 32 2b 76 | 64 75 76 61 72 69 61 62 |6)<<(2+v|duvariab|
|000061b0| 6c 65 6c 69 73 74 21 32 | 34 29 0d 23 b4 0e 77 6f |lelist!2|4).#..wo|
|000061c0| 6e 74 69 6d 65 25 3d 91 | 0d 23 be 08 e6 30 2c 34 |ntime%=.|.#...0,4|
|000061d0| 0d 23 c8 11 74 6f 74 61 | 6c 74 69 6d 65 25 3d 35 |.#..tota|ltime%=5|
|000061e0| 30 0d 23 d2 05 f5 0d 23 | dc 60 20 20 c8 9d c8 90 |0.#....#|.` ....|
|000061f0| 63 78 25 2a 28 2e 37 2b | 2e 33 2a 28 91 2d 77 6f |cx%*(.7+|.3*(.-wo|
|00006200| 6e 74 69 6d 65 25 29 2f | 74 6f 74 61 6c 74 69 6d |ntime%)/|totaltim|
|00006210| 65 25 29 2c 63 79 25 2a | 28 31 2d 2e 34 2a 28 91 |e%),cy%*|(1-.4*(.|
|00006220| 2d 77 6f 6e 74 69 6d 65 | 25 29 2f 74 6f 74 61 6c |-wontime|%)/total|
|00006230| 74 69 6d 65 25 29 2c 63 | 78 25 2a 2e 30 32 2c 63 |time%),c|x%*.02,c|
|00006240| 79 25 2a 2e 30 32 0d 23 | e6 1c 20 fd 91 2d 77 6f |y%*.02.#|.. ..-wo|
|00006250| 6e 74 69 6d 65 25 3e 3d | 74 6f 74 61 6c 74 69 6d |ntime%>=|totaltim|
|00006260| 65 25 0d 23 f0 0e 77 6f | 6e 74 69 6d 65 25 3d 91 |e%.#..wo|ntime%=.|
|00006270| 0d 23 fa 12 74 6f 74 61 | 6c 74 69 6d 65 25 3d 31 |.#..tota|ltime%=1|
|00006280| 30 30 0d 24 04 05 f5 0d | 24 0e 5f 20 20 c8 9d c8 |00.$....|$._ ...|
|00006290| 90 63 78 25 2a 28 31 2b | 2e 33 2a 28 91 2d 77 6f |.cx%*(1+|.3*(.-wo|
|000062a0| 6e 74 69 6d 65 25 29 2f | 74 6f 74 61 6c 74 69 6d |ntime%)/|totaltim|
|000062b0| 65 25 29 2c 63 79 25 2a | 28 2e 36 2b 31 2a 28 91 |e%),cy%*|(.6+1*(.|
|000062c0| 2d 77 6f 6e 74 69 6d 65 | 25 29 2f 74 6f 74 61 6c |-wontime|%)/total|
|000062d0| 74 69 6d 65 25 29 2c 63 | 78 25 2a 2e 30 32 2c 63 |time%),c|x%*.02,c|
|000062e0| 79 25 2a 2e 30 32 0d 24 | 18 1c 20 fd 91 2d 77 6f |y%*.02.$|.. ..-wo|
|000062f0| 6e 74 69 6d 65 25 3e 3d | 74 6f 74 61 6c 74 69 6d |ntime%>=|totaltim|
|00006300| 65 25 0d 24 22 55 f2 70 | 72 69 6e 74 63 65 6e 74 |e%.$"U.p|rintcent|
|00006310| 72 65 64 28 22 57 65 6c | 6c 20 64 6f 6e 65 20 2d |red("Wel|l done -|
|00006320| 20 67 72 69 64 20 73 61 | 66 65 6c 79 20 63 6c 65 | grid sa|fely cle|
|00006330| 61 72 65 64 22 2c 32 2b | 28 76 64 75 76 61 72 69 |ared",2+|(vduvari|
|00006340| 61 62 6c 65 6c 69 73 74 | 21 31 36 2b 79 73 69 7a |ablelist|!16+ysiz|
|00006350| 65 25 29 3e 3e 31 29 0d | 24 2c 05 e1 0d 24 36 05 |e%)>>1).|$,...$6.|
|00006360| 3a 0d 24 40 0c dd 20 f2 | 74 69 74 6c 65 0d 24 4a |:.$@.. .|title.$J|
|00006370| 45 ef 32 33 2c 31 37 2c | 37 2c 25 31 31 30 2c 38 |E.23,17,|7,%110,8|
|00006380| 2a 28 76 64 75 76 61 72 | 69 61 62 6c 65 6c 69 73 |*(vduvar|iablelis|
|00006390| 74 21 31 32 2b 31 29 20 | 81 20 a9 28 22 53 74 6f |t!12+1) |. .("Sto|
|000063a0| 72 6d 73 77 65 65 70 65 | 72 22 29 3b 32 34 3b 30 |rmsweepe|r");24;0|
|000063b0| 2c 30 0d 24 54 08 e6 30 | 2c 33 0d 24 5e 3e ec 30 |,0.$T..0|,3.$^>.0|
|000063c0| 2c 28 28 38 2a 28 76 64 | 75 76 61 72 69 61 62 6c |,((8*(vd|uvariabl|
|000063d0| 65 6c 69 73 74 21 31 36 | 2b 31 29 2d 31 32 29 3c |elist!16|+1)-12)<|
|000063e0| 3c 28 76 64 75 76 61 72 | 69 61 62 6c 65 6c 69 73 |<(vduvar|iablelis|
|000063f0| 74 21 32 34 29 29 2d 31 | 0d 24 68 6b ec 34 2a 28 |t!24))-1|.$hk.4*(|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.